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INTRODUCTION 


This document contains a description of the work done by Emmanuel College 
under contract no. F19628-73-C-0190 in support of AFGL experiments which were 
flown on satellites S72-1, S3-2, and S3-3. Specific documentation of the 
trapped radiation environment for selected time intervals between October 1972 
and January 1976 is included in graphical and tabular form. A mathematical 
model of the trapped radiation proton environment based on the S72-1 data is 


also presented. 


Satellite S72-1. 

The experiment flown on S72-1 consisted of a “Heavy Particle Identifica- 
tion Instrument" constructed by Panametrics Inc. For a description of this 
instrument see References (1) and (2). We have previously reported directional 
and omnidirectional proton flux summaries. for this experiment (reference 3). 
The S72-1 orbit was nearly polar and approximately circular at an altitude 
of 760 km. This gave good to excellent coverage of the region of "L-Hmin" 
space including 1.14 < L < 4.0 earth radii and 100 < Hmin < 760 km. 

The data from S72-1 covered the time period of October 1972 through 
December 1973. No obvious temporal variations were observed over this period. 
A subset consisting of all observations for the time interval October 1972 
- February 1973 was selected as being a representative sample for analysis. 
This data base was sorted into an L - Hmin grid and an empirical fit was made 


to it using multiple linear regression techniques. The resulting mathematical 


model showed agreement with the original grid with an RMS error of less than 


| 


ten percent. A listing of the model in the form of a FORTRAN coded function 
»ibprogram is given in Appendix - A. 

A FORTRAN program was written to duplicate as closely as possible the 
orbital integration map which Levine and Vette use to illustrate their “AP6" 
proton modei for a similar range of energies (reference 4). AP6 is a composite 
of eleven experimental data sets from various satellite experiments from 1961 - 
1964 and is widely referenced as the proton radiation standard. The results 
from our model are tabulated in Tables 1 and 2 and the comparable results from 
Levine and Vette are given in Table 3 and 4. 

Comparison of the tables shows qualitative agreement but with differences 
of up to an order of magnitude at the lower energies. Vette suggests that fac- 
tors of two uncertainties exist in the calibration of some of the experiments in 
his composite, and that temporal variations of a factor of two could exist. 
However, the Vette model is effectively a fit to a much larger portion of L-Hmin 
space and is heavily weighted with data taken at Hmins above 1000 km. Our data 
suggests that AP6 does not represent the proton environment below 1000 km. very 
well. We have submitted a copy of our $72-1 data to Dr. Vette to be included 
in future updates of AP6. 

Further documentation of our proton model is given in Figures 1, 2, and 
3. Figures 1 and 2 are a three-dimensional map of the modeled fluxes vs L and 
Hmin viewed from the low-L side and the high-L side respectively. Figure 3 is 
a set of plots showing the energy spectrum as a function of L and Hmin. 
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Satellites S$3-2 and S3-3. 

Satellites S3-2 and S3-3 were launched in December 1975 and July 1976 
respectively. They were polar-orbiting satellites but had more elliptical 
orbits than S72-1. The AFGL experiments flown consisted of similar proton 
detectors and hence the results will be discussed together. The S3-2 experi- 
ment consisted of a LEPS (Low Energy Proton Spectrometer) and one P - Alpha 
(proton - alpha particle telescope). Satellite S3-3 had two LEPS and one P - 
Alpha. For a description of the LEPS see reference 5. For a description of 
P - Alpha see reference 6. A representative data sample was chosen from each 
satel ite to analyze. This consisted of 186 orbits from S3-2 from the time 
interval December 1975 - March 1976 and 383 orbits from S3-3 for July 1976 - 
January 1977. 

A data reduction system consisting of four FORTRAN programs for S3-2 
and five programs for S3-3 was written. The first program strips off the 
AFGL experimental data and gives a short summary of calibration and analog 
housekeeping data. The second merges ephemeris and attitude parameters into 
the data file. The third adds magnetic parameters and calculates pitch-angle 
related geometric parameters. The last programs sort the data into an L-Hmin 
grid for further analysis. This set of nine programs is incorporated into 
this report as Appendix B. Tabular and graphical descriptions of the data 


and analytical results are incorportated as a part of this report as 


Appendices C through E. These appendices are described briefly on the 


pages following. 


Appendix C. 

This appendix gives two extended tables presenting the results of the 
P-Alpha experiment for each of the two satellites. The format was chosen to 
be compatible with our previously published tables summarizing satellite $72-1 
(reference 3). Each page in the table summarizes all the sampled data from a 
small interval in L. Down the page, this L interval is divided into several 
Hmin intervals. For each L-Hmin combination, average values for the set of 
observations are given for Hmin, B, and the corresponding equatorial pitch 
angle EQPA. The ratio of the average B value to the equatorial B value 
corresponding to that L-Hmin is given as B/BEQ. 

There are 14 columns across the page. The first column represents the 
central value of pitch angle corresponding to that line of data. The line 
labeled "7" is the sum of two 15-degree pitch angle intervals 0 - 15 and 
165 - 180 degrees. It can be interpreted as a background, and the calculated 
directional and omnidirectional fluxes should be of good quality as long as 
the background is small relative to them. The line labeled "90" is the calcu- 
lated directional proton flux and is based on the pitch angle interval 75 - 
105 degrees. The line labeled "0" is the calculated omnidirectional proton 
flux and is based on a sum over all pitch angles. Columns 2 through 11 are 
the 5 proton fluxes with their respective RMS error corresponding to the 5 
energy intervals given in the header line above them. Column 12 is the obser- 
vation time in seconds. Columns 13 and 14 are the integral proton flux 


observed by the instrument and its RMS error. 
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Appendix D. 

This appendix contains a representative sample selected from the energy 
distributions observed by the S3-2 and S3-3 LEPS and P-Alpha instruments. The 
sample was taken at L = 3.5 to 4.0 where background from high energy protons 
and electrons is at a minimum. The average B, L, Hmin and B/BEQ values corres- 
ponding to the data sample represented by each plot is given at the top. One 
curve is drawn for each Hmin group and plotted with a unique symbol. Table 5 
below gives the symbol correspondence with the Hmin parameter. It also gives 
the mirror point B value corresponding to each L-Hmin group so that comparisons 
with cata sets from other experimentors based on a B - L coordinate system can 
be made. The agreement between the three instruments over the energy interval 
500 Kev to 6 Mev alos serves as an in flight verification of the instrument 


calibration. 


Appendix E. 

This appendix contains a set of plots of the observed time history of the 
two LEPS and the P-Alpha instrument from S3-3 for selected L intervals. Day 
one in the plots was January 1, 1976. A Kp curve is included with each plot 
to show the corresponding solar related activity for the same time interval. 
Attempts to correlate the fluctuations in the low Hmin fluxes with the -Kp 
index and other similar geophysical parameters have not yet been successful. 


The constancy of the higher Hmin fluxes is partially due to a saturation con- 


dition at high count rates in the solid state detectors. See Table 5 for the 


symbol correspondence with the Hmin coordinate. 
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+ICT 3, G) 
=> CONTINUE 
IF (IZOF6ME.G) GO TN 206 
ITFCIE LY.Tazy GS tt 30 
GO T) 20 
269 CONTINUE 
WRIT? (8, 2065) 
2506 FOQMAT(S%,*=9T =NSOUNTEREN ON AFILES) 
STOP 
290 CONTINLE 
IUNT=8 
CALL S20STAC ISNA, ISON, ISANy JSANyIUNTy IST3y 2) 
WOT T= (6,2067) T2Td 
WRITE (5,2007) ISTL 
WRITE (93,2937) IST4 
ZG07 FORMAT (S¢,*Z0F ZNSGUNTESED IN AFTLE 4¥ S220 8K" 
#* AFTEO 2©CIRN NUYIER*,I6) 


APP-P=e 1 = & 


29 


G) 6 Se 


ITF CIFGALNE.1L) CALL S20UTACTSOAZISOA, TSAN, JSAN,IUNT, 


PAGE 


‘ 
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CALL DISSON(A) 
Fug 


A FI 
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SUBROUTINE S2UPACTSOAT,JOAT,TANA, SANY,NSS7) 218 
CHER SERHEESEEEEEFEREREFEE REE REE ERE EERE EK EEEES PERSE EEESER RHE 2149 
se eens 220 
& £375 SUBP2OS2AM. Fe HOLEMAN. LAST A4.TFRED 1 DEC 73 Pet 
> 1975 = §3-2 DATA RENURTION SYSTEM, CPLAT=N 16 NOV 75 22 
Se eens 2am 
TERRES 724 
C JNPACK “FILE SORMATTEN JATA FRIM MCINFRNI“ 225 
Oeeeve 276 
Re FER REE BEBE ESEEREE REEL EMER ER HR, PHRRFEREL Ts BERL EHMEEAEERESE 27?7 
DIMENSION [LIATC37) ~-JDAT(A 5) e TARN( 3H) «TANT (GG) » JANN( GLE) 278 
JOATCL=LVAT (4) 229 
Treen 235 
> SFCONE 24-2-14 2314 
Se eere 222 
IF(NSSC.3T.16) VSSS=1 233 
JDATC 2) =4XS55TK( TIS" (2) ty 4) 234 
JOATIZ=4XGETXCTIAT (2) 4554) 2 ES 
JODATCS) =SATAETIMXSE TX CIOAT (2) 4992) 917) eYREMXGFTXCICAT (3) yg 1,5 2) 
JDAT(S)=4IXSETXCTOAT (3) 5 3, &) a 
JIATL OV =A4XGETXCLT VAT (C2) ,7,4) 278 
SNATC7I=4K GE TXCT OAT C4) 915 4) 23a 
JOATCSY=4XGETXCTIAT (GD Sy 4) 745 
JOA T(OV=H=SHI= TOMXGETXCLIOAT CG) 9992051727) oe M2eMKXGFTXCINAT (5) 9159?) 
JOATL LOI =EMXGETXCIVAT(S) 43,4) 2&2 
JINATCALDEMXSETXCIIATOS) 97 54) 243 
JDAT( 12) =4XSETXUTIATCE) 91 94) 244 
JOATC 13) =MXSETXCIVAT(S5) 9554) 245 
Sreeery 74uG 
> JFCODE F-ALPHA NATA 247 
TREES 2uR 
JDAT( 14) = SAD FT O4XS=TXCINATO7) 5 754) 575) OP eMXGOETXCIIVATCR) 5455) 
SREES 250 
> DECONE 24-5-21 2S 
Se eeee 252 


SDAT LSD ESATETOMXS= TX CIMATOS ) 9 794) 924) OVOMXGE TXATIAT CS) 94, 4) 
JOAT(16) =SHIEFTOMXS= TX CTOATOAD 9555) 0! 2) 6 OPS MKGE IXCTVAT (1%) 91,2) 

JDATCA7) EMXSETXCIIRTCACD 9 39%) 255 
JOATC1L3) =MXSETXCTIATOC119, 192) eo 
JINATCL9) =SHIFTOMXS = TXCTOATOLLD 9992), 36d eDReMKGETXCLIAT(L20 yy 6) 
JOATC 2500) =SALT FT UMXS= TX CIDATO12) 97, 4)y 274) OR eMXGETXCTOAT (13) gly 4) 
SOA TC2L) = SHIFTOMXS= TX CIDA TILT) 9546), £2) DP eMXGETX(T IAT (14),1.4 2) 
IDATC 22) =4XSETXITIATOCL4) 9 39%) 26a 
JOATC 239 =4XSETXCIIVAT(LS) 5 19%) 254 
JOAT. Q24D=SHIFT UMYS= TX CIMA TELS D 995205 76) eDPeMXGETXOITOAT (L6G), Ly 5) 
JOATOZ5)= SHITE TOMXSITXCIOATILAD 9 7p 4), 249 eIReMXGETXAETOATI17) oly 4D 
JOATC 26) =SALETOMXS= TXOC INA TI1L7) 9556), 12) oe DP oMXGETXCTVATCLB) y Ly 2) 
JDAT( 27) =4XSETXITIAT (18) 5 398) 265 
JOATL 23) =4XGETXITVAT (19) 5 15%) 2656 
JONT( 29) sSHIFTOMXS=TKCTOATOL GD 9992), TH) eDReMXGETX (CF TAT (20) 91,4) 
IDATUBOD=SATETCMXS > TXCIMATO2 GO) 9 7p 4), 24) eIPEMYGETXCTVAT(A4) 915) 


APP-f- 1 = 6 


31 
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of eee 
> MNECONE 24-5-22 


Se eeee 


JDATOCSLP=EMXSETXCLIIAT (21) 45,4) 


OFR/14774 PAGS 


7 


769 
2720 
271 
27? 


INAT( F202 SHITE TIMXS= TXCIDAT(2A1L) 9992022) eOReMXGETXCL DAT(22) 914 2) ‘ 


JDATC33) =YXSETXCTIAT (2205 354) 
JOAT( 3G) =MXSFTXCIIAT (22) 5 74) 
JNATC 35) =4XSETXCTIATC23) 4 154) 
JOAT( 36) =4X5ETXCTIAT (2395 555) 


274 
275 
276 
277 


JDATEZ7TI=ASHTFT (M¥G= TK CIDA T(I23) 69920522) OR MXGETXIT IAT (26951, 29 


JOATC SSP EMXSFTKCTIAT (24) , 354) 
JNATC3AVP=AMXSETXCLTIAT (C249, 7,4) 
INA TCGCDEAMKZSETKOIVAT(25) 5 1y4) 

7+ GGues 

e YECNDE MAGNETOMETE SS 

Tees 
TC=5 
Tw=25 
(19 3° TY=44, 65 
JOATCTIV=MXSETXCIIATCIW), TC. 2) 
IC=17 +42 
IFCT™LE.9) 69 TN 30 
lWeIne1 
Tc=1 

#2 CONTY NUE 
Se eer 
> CONE “4-2 ANALOG 


“eee ee 
we 


UN Il=1,36 
TANTCITI=4XSETXCIVAT( TW), IS, 2) 
Ic=1It+2 
EP CT. ebEs IF GT FO 29 
[welTae. 
TC=1 
Pa CONTINUE 
TANTC 37) =MXSETKITIAT (6) 99 92) 
TANTC 3A) =4MXSETKCIV°TI7) gt y2) 
IANTC 39D =MXSETXCTIATOCZ) £3,2) 
TANT( QC) EMXSETXCIIAT OZ) 95 92) 
~7 eee es 


> TSANSFES TANT VALUES 44ND NETERMINE SSO SOUNT VALUE 


Tees 


ssc: 0 
JSSC-9 
NN 2. Il=1,355 


TFCTANTCLIY DL T6497) ° 9) TANNCT TD HLANTC TT) 


IFC IL LE eS eAVOCTANF CTI) Lh 1240908) 


I33G:If¢s 


IFC CTT Gh e be ANDeTT eb Fe 16) AND. TANTCTIDLT.4OG06) ISSDSTI“G 


IFCIY LE.20) SO TY 25 


ROP a fe 1 


32 


4 


279 


PAE ERE 
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IFCIANTCITD.LT2400°53) JSSCHIT-20 
CONTINUE 

TFC JSSC.NE.3) NSSD= JSSC 
IFCISSC.NE.G) NSS>=TSSC 
JANNCLISNSST) HTANTO27) 
JANNO2,NSSC) =TANT( 73) 

JANNO 3 SNSSC) =LTANT (79) 
JANN(GNSSS) STANT (20) 

RETURN 

ENO 


APP=P- 4 = 
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SURPYUTINE F2RPKCIIAT, TANN,KPAT,K ANN NSS) 
TR OEO SERRE EE SEER EEE EE ES SERETEREEEEREEEEE EEE EEE EER EHEC EEEE ESE 


7eeeee 
> £975 SUBPROG2ZAM. =. AOLEMAN,. LAST ALT=PENM 21 NOV 75, 
> 1975 S3-2 VATA QAIITTTION SYSTEM, CREATTH 18 NOV 75 


-eeeee 
sr RFPACK YATA MATRIX ANY HOUSE KE= OTNG INTS FILE FCRMAT, 
LF eer es 
TURE E EEE EERE REE EEE E EE EEE EEO R EERE EEE EEEEE EES EERE REESE EEE EEE 
DIMENSION JIAT(H5) ,ITANNOZE), KDAT(27) »KANV(I7) y 

# ITP TV (65) 5NHK 07) 

DATA THIT £56) G* (2% 91% 918) yo Oy 16845, S08 24425497 

TWwN=} 


NN 635 IT=ly, 
KOATCTID=26 
0 CONTINUE 
00 1° IT=15955 
N3T=T3ITCIQD 
as CONTT NUE 
TATZ=LTITLAN3T 41 
EF (tnt 2se.Es0} GI FS 26 
KNA TCI ADI =TS8V ITXC TAT2,NaT KIAT (IW), JOATC(TT)) 
LO TY 39 
7G CONTINUE 
NBT=NBT-fF8T1 
KNATCIWDI=ATSBYTX(L, IATL gKOAT CINDD pSATFUCIOATCT 3) ,-N9T)) 
TAT1i=6C 
IWO=T wel 
oN TI 42 
20 CONTINUES 
IRTit LB 2-1 
IFCIST1e5F.0)3 SO FY 18 
IWD=Twoet 
IfT1=63 
“0 CONTINUE 
NHK (LIEZCeNSSS 
NHK (2) =NSSC#G 
NHK (S)=ENSSC-6 
IFONYK (3) 2G 25) NAXK C3) =0 
IF CNHK(2) LT 27) N46 (2920 
NHK (4) =374#45* (NSSC#12) 
NHK (5) =NHK (4) #4 
NHK (©) =NAK (5) #1 
NHK (7) =NHK (5) #1 
90 53 ff=1,7 
IF OCNMK(CIT)D.LE.O) 35 TO SC 
JJ=MON(NHK (TID 55) 
IF(JI0EQV. 9) JU=5 
ITIA=U(NHKITID -1)976e1 


P2ISQAM S2°088 05/14/78 PAG? 172 


SJA=55-9F JJ 

IF CTE NNIWAKC TTD) 59240009) TANNENHKITT) =4902 
KANN(TTAD=TSBYTK (JIA SS ,KANNCOIT AD, TANNONHK (TT) )) 
CONTINUS 

RETU?N 

ENN 


229357Am S2298R OF 414778 QAGES 


SUBRIUTINE TIATS(L, TMy MON pH2y JD, 4092) 
SORES RSE TESEFE EERE ES ESET FETE SH SETUPS EREHEEE TE SESE SU RE EEMEEEU TE 


oat | 
7 1975 SU3P2ZIGRAM. =. HOLEMAN. LAST A_TFRATION 16 MAQ 77 
S DMPEATEN 12 YES 75 
se eeey 
Te eee y 
TRE SUBPROGRAM FILLS TN THE MISSTNG PA2AMETERS TO STVE 
THE COMPLETES TOME J=STEIPTYON LISTE) Ty Ti€ TARLE 
SOLOW WIT4 THE INPUT SPECTFIED RY MODE, 
7 eae 
- ere 
OF FINITION VY 2ACAMETFTES, 
L(1) YEA? 
L(2) nA 
L¢3)) 492 
L(4) 9 4TWUTE 
L(5) S=t0VN 
L(6) = MISROSECONI 
L«7) ELAPSED TIM? IN SECONNS SINS! C.00C IFE©C2 1) TIME 
DEFINED BY 1419 = LO) 
SAME AS LO(7) IN MECTMAL FRACTION FOOM WITH _(6) 
AYI=) 
TIME OF VAY IN HMUP + FRACTION 
MODIFIE9 JILTAN DAY PELATIVE TO EPOCH TEPCi 
ALIHANUM=RTT JATE IN FORM OD vaN vo 


32 C2492 47 09439 wd OD 


<2 ye SE 


C4 SA ee CH AED 


.? 


eeere 
ueeue 
MOME TS A Ta) SHANACT=? OCTAL =LAG DESS2TSING THE INPUT 
SYNOITIONS, SASH C4A2ACTES CF WHICH ACTS AS 4 G 
PYSITION SWITS4. Tai FIRST CHARACTER (LEFTMOST) SPECIFIES 
THE SOU?SE JF THE YEA> ANDO DAY AS FOLLIAS. 
7* Fe ‘ 


2 
~ 
” 
~ 
4 
n 
, 
~ 
, 
fod 
, 


LOL) -h (2) SEF TNPUT 

COL ,sL€2) FO BE CALSULATED -70"% JQ MQQ TEPT 1 
Ltiseth (7) FA SE CALSULATER -S309 L O77) 
L¢ibyl (2) FO RE CALSULATED -20" TM 


moo iM 


Se SOEs 
> THE SECOND S4A2ACTE® (CPIGHTMOST) SPECI-TES THE SOURSE 
L¢(3) THRIUGY LCS) 


AO YTNPUT 

TD F& CALCULATED FROd HP 
TY 3© CALCULATED FRO L(7) 
TY XE CALCULATES FROYW TM 


enero 
Ct ee | 
wwvev 


7 eer e 

Sewer 

[ ALL SIXTEEN TOMRTNATIONS OF THE TWO SWITCHES APE ALLOWED. 
7D eer 

KORO REUSE ERE EE RE EERE EEE TERETE EERE EEEREREE EES FETED ER EEEEEE EEE 


NIMENSTON Li 19) 


APP-f- 1 = 11 
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DATA TE®PSL eT EOC2g<¥RgLYR 
#4/195U,1972 5141/7 
IF(MODE «5 T2448) G3 TD 106 
IFCMODE.LE.73) 59 50 10 
ae a 
CALCULATF Y=A2 AND HAY 
eeere 
IF COMODF 24ND 2103) -VE.108) GI TC 20 
CALL JULED(IN,L (1), 42) 5 TEPT1,MON,OC! 
GO T3 16 
CONTINUE 
TYM=Tt™ 
ItL7=t (7) 
TFI(MOPNE.GE. 203) TL7=TM™ 
L(7)=IL7 
NMAY=L(7) 785400 
NYEAZ=NN8NY/365 
L(L)I=NYEAQR+ LEPC? 
LIZ) =NDAVENVEARE TSE K(NVER SOHC VYR)SUHL 
TP CLC20eGEsLl) GO TD 26 
t CEPSU 01) 1 
L(2)=366 
164 CONTINUE 
IF (LOL) -L T6190) Lt) =L (1) 41409 
,eeve 
CALCULATE H? 
ht edad 
IM0=4O0C.4N).78 
IFCIMDO.£9.1) GO TV 39 
IF CIM0N.GF.1) GO Td 4C 
HR=FLOAT(L (3) * 35CG4#L (G4) FRO (5))7362 Se tFLOAT(L(4)) 
#/1LeECO/ 2505. 
GO I 58 
CONTINUE 
IL7=L (7) 
TYM=T™ 
EPCINOSE DSc) VIGSrLs 
HR=TITM/36)9. 
TIHR=4R 
HR=FLOAT (MOD (CTH? 425)9 4+ (HO MFLOAT(THO)) 
76 CONTINUE 
one. Ae 


> GALCULATE Li) => LCS) 

Te eeee 
L(3)=HR 
NHP=LHR==LOAT(L(3)9)*60. 
L (4)=DH 
DHR=ONHRFLIAT(L(4)))* 60. 
L(5)- DAR 
L(6)= COHR=FLOAT(LO5999%1. 604 
IF (L(6) 656 699999R) L(5)=0 (5) +1 


APP=R- 4 - 12 
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IF (L06) 6G£.9999393) L(6)=C 
© CONTYNUE 
veeene 

RALCULATE Lt&7) AND YM 

IFCIMD.LT.2) G0 TY 635 

IFCIMD.ED. 4) LOZDETM 

IFC IMD.E 2.2) TM=FLOATOL (7 DD FFLOAT (LE 599/105 06 

GO T? 70 

CONTTNUS 

LA7)=L 05) #59* (LOKI EB IE (LO 4 264( 365" (L (1) -T EP C2 

# (LCA) TE2 5 PAL YQ) sot L (20-190) 

TM=FLOAT(L(7)) #FLIAT(L (6) 0/1 6 E06 

CONTINUE 

CALL JULE VC ID L (1) .L 02) 9 T EPIL y MON, 1) 

RETUPN 
102 CONTINUE 
RSE es 
> @6SET FPOCHS 
Se eeae 

TEPC1=L(1) 
IFPC2=L(?) 
KYR="O9(T 595 1-1, 4) 
LYRE”ONLTEPS 2-154) 
RETUIN 

ENN 


~ 
, 
~ 
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SUBRUUTINE JULEV(IVZLY2sL DA, TEPC) MON, MONE) 
NIMENSTON MONA (L2) 4 MONS (2 2) 
MATA MONA /3HJAN y3HFER 5 7HMA2, SHAPRy7AMAY, TH JUN, SHULL 
+ 3HAUs» SHSE9%, SHOCT, ZHNOVe ZHNECS 
OATA MONS #31 5:98 9 Fhi'y 365 SLi Shy Sig 2h es Vests seas 
ME PC=MUDN(TE2>5=1,4) 
IF (MONE .VE.5) GO TI 10 
De eeRe 
5S JFRIVE LYQ AND LOA FRM IN, TEPS 
~vEECR 
NOL Y2=J0/ 365 
aie CONTINUE 
LYR=LEPCENILYR 
LOA=J- 365 *VILYQ=-(NOLY O#MEPT) S441 
IF(LVA.GT.C) GN TI 25 
NOL YI=NILY 2-1 
GO TT) 54 
| aE CONTINUE 
eae 
QFRTVE JO FQOM LYR,LIA 
7 eee ewe 
TECLVY2.LT 2120) .V2=190N4L YO 
NOLY?=LY2-T:PC 
IN= ZHS*PNILYVECNILY 2 #YEPC) 24+ LN AMt 
76 CONTINUE 
ae oo 
JFRIVE MON ©ON4 LY2,L IA 
{ a 
MYR=MONCLY 2, 190) 
TF CMOD(LI 254) 62700! MOND(2)229 
! INA=LOA 
| NO So. LT=£,02 
4 TMON= IT 
IFCIVALE.MONSCITYY 30 TN 4? 
| TNA=TNA-4INZC(TTD 
1 70 CONTENJE 
IT=4 
\ 
} 


tPA we 


re) 


aaa 


+6 CONTINUE 

ENCOIE(13,4001—49N) ITOA,MONS (IT) MY? 
FORMAT (1X%91251X,A2, 13) 

MONB( 2) =23 


f 
o 
co 
- 


PF TUIN 
END 


14 
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SUBRIUTINE S2PAL(IANO,LOAT gI3H) 
SF ERT KEE H SE SVC ECE ESHER SEE SHY TERRE EEL EET EEE ERR eRe ee ERNE 
ine were 
y {ars SUIPRNSZAM,. =. HOLEMAN. LAST A4_T7RED 19 EC 75 
ee ee as S3-2 DATA Q=EVISTION SYSTEM. CREATEN 18 NOW 75 
~veece 
SP ¥ees 
5 UMPACK %<AL244 DATA ADO INTC THREE CI4PONENTS AND OVESFLCW 
Sat TS. 
fe earner 
ei. BUS RRL EERE SEER RTA REE SHER SEMEL ESBS EEL EET PERE RSREEEE EE BERR 
DIMENSION LIAT (4,9) 
SESE Y 
> IMWVERT fwn 
Sv eee ® 
JWN=t 
OM t: FL=1,55 
JWDESHIE TC IAD, 1) D> eLSYTX (IT yt yITWN) 
CONTINUE 
ICH=L BYTX (54% 5%, INV} 
TCH=TCHtet 
LOAT(1,IC4)=LSYTX (275165 5W) 
LOATI A, ITAV=EL AVTXK(1 89189 SW) 
LOATC3,ISAV=ELUYT¥ (4 516, 9W9) 
LOAT(GyIS4) =LAYTX( 5 291, IW™ 
LOATOG,IC4)=SHIFTC(LOAT (Gy ICI) 91) eORLBYTX (3651 ,5WD) 
LOAT(G ITA =SHIFTCLAAT (Hy TOAD 91) 07%. LAY TX (1754 SND) 
PFTUIN 
END 


PP2FOST AM $220 33 C6/14/73 PAG: 


SUZRIUTINE S2Z0UTACT SOA, ISOA,TSAN,JSINGTUNT, IOTZ, TFA} 
5 BRN WHERE RS SER RARE BEE RAE SEERA RHEME REL REE EERE REE EEE REE EERE 


Seer e 
Eo 7S FUBPRISZRAM. £F. HOLEMAN. LAST ALTFREO 24 JAN 75 
£475 33-2 DATA RENISCTION SYSTEM. CREATEN 25 NOV 75. 
Oe oe 


<P wd e207 LD 


Te eees 

5 YIFGA = 3 ==> NOSMAL PPOSESSING 

> FGA = 1 =s> LE°S CALTRRATION YATA 
> FFGA = 2 ==> TITALS =-AR FELE 
"UREN E 

oe 2 


S SPEATE 10 LTNE SUMMARY OF ANALDG AND OLSITAL DATA. 


Tk EERE 
SERRE RUHR BERK ERE RE RHEE EEE EKER EERE EERE ERE TES BREST HHEHESREEE ERE 
DIMFNSTON IS 949 (44), TSAN(1 CC) » USNR (4,39, IS AN (4,4) y 
#MOUTC 272,13) ,MESS(12),JOUT (35) ~KSIA (44) LSDA (4,8), 
+KSAN( 63) ,LSAINGG,8) ~NIIT(L 0), ICALC44D, JOAL (4, 
FQUIVALENSECKSOA (1 2),LS94 (1,1)) 
EQUIVALENSE(KS4N(37),LSAN (1, 1)) 
EQUIJALENSECICAL (1 7),JSCAL (1-1)? 
NATA [CAL /%4&*0/ 
MATA NOUT,ISALL » KSINgKSDA 48 *¥1 7510515112 3*G/ 
FXXXLIZZV=FLIOATCIZ7 - AND eMASCB) SELOAF (SHIFT (1T275-65)) 
FOALE=ICILLe t 
TFC ICALL.NE&E~1) SO TO 2c8 
MAS KB=7777777777777778 
FNC ONE (63, 4901-24255) 
2934 FORMAT (#5 3-2 SATA FEQUCTION SYSTEM, £4 SFECNE TOTALS*, 
+T6094tH ) 
MESGO7)=LI4-FEPS CALI8 
MESG( 8) =194RATLIIW 
MESG(9Q) S49HTOTALS =9OR 
“ESGU1L9)=154 FILE 
GLEP=5.4742 
2799 CONTINUS 
N90 240 If=1,19 
N9 210 JJ=1, 23 
MOUT( JJ, TID =1.E12% 
Zi0 CONTINGE 
IFCI=-GA.EV.2) GIFT 190 
BO S&F Lisisie 
JOUTCIID=LSIACIIT) «INO. MAS KE 
IFCIYCST.8) GO TI 459 
JOUTCIIT4e1 2, =ISSBVACL, TIT) -ANNYMASKP 
46 CONTINUE 
WRIT= (35,2954) I573, ( JOUT( ID, T=1,20) 
PEDG FOQRMAT (AX, T5919, 3T7 p4I Rg G4IT9, SITS yg 2TAy T20 QT1) 
IFCISGALED 69) WRIT CIUNT, 2061) (MESS (T) pI =15 8) 
TF CIF GALEV.L DY WRITOCIUNT, 2CG1) (MESS CT) pTHle MP eMESO(7), 
+#+MESG( 6) 


AOPmeFe f = 16 


41 


1Fé 
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“bil 


2907 


2uus 


FORMA T(//75X, 6A1°) 
WRIT? (CTUNT,20C02) 


PAG: 


FORMET(4C,34 * o& 24-6 ANSLOG*,5X,3H * 4 7X g*24—4% VIGT*y 
t¥TALT y6Xy 34 * 8 P2K- 2%, 3K * 5X yFP4K=2? JIGITAL (SUMS # AVER® 
tFAGES # NO. OF DES" AVATIONS)®) 


WRITS (CIUNT,2003) 
FOR MAT(4&X,34 * ,* AVERAGE S* 57X34 * 97X_*% AVESAGTS*, 


+9OX_y34 © ,FANALY, 34 * ) 


Ce ir Lee" 


09 8) II=37,68 
ISANCIT) =TSANCTID#TSAN(TI #22) 

CONTINUE 

90 12 Il=1,16 

IFCITAN(TT #5) 650.9) MIUTC 1, TID SEXXXCTS®NGTT #590) 
CONTINUE 

D0 20 IT=193 

00 22 J#=19% 

IFC UTANGSSyLTT)eGTe.) MOUT CSS #1 IT) == XXY CISAN(SUy ITD) 
CONTINUE 

PO 3. Tl=tss 

IFCISAN(LI).GTel) YOUTCLLyIT) SEXXX(LSAN(IID) 

ONTINUE 

Nn 42 Tries 

IFC USOACL STL} 6GT.0) MOUTCEsE I) =SHIFE (CSSON (1 TT) 9-45) 
NC &) JS=1yh 

IFC USOACSS IL) oGTe 2) MOUT (SS 46 ITD EEXXK CISDACSIy IID 
CONTTNUF 

On S* II=1,12 

MOUT(TI#11,1)=ISIS (11) AND. ASKR 
MOUTCTI¢Lt 95) =ISIVACIT #6) « AND. MASKA 

ITFCTSOACTIV «GT el) MOUTCET 411, 2V=SHIZTCTSIACIT) 9-450 
TFECTSOACIL#5).6T.60) MOUTCII¢1197) =SATETCISOACIIF6),-45) 
ITFCISMACTT).S5Ted) “OUTIL #11 y2d2°XxC (ISDA (IT)) 

IFC TSOACII #5) oGTe0) MOUTCITHLL 6) =FXXX CISONLTI 469) 
CONTINUE 

N0 230 If=t,1¢ 

TIZ=NOUT(ID) 

WRITS (TUNT, 2011) TT, (MOUT (Ty IT), I=1, 711) 

CONTINUE 

CONTTNUE 

IFGR= ISNA (2) 5) e OND. MASKR 
IFSSHTFTEISIA (2,5) 5-45) oL Tes) TFGR=13 

09 72 I¥=1,100 

TFCTYT SLE 6538) KSONCTTD =SKSAN(TID #TSANC TT) 

ISAN(II) =2 

IFC II eST2 44) GY TI? 77 

TFCIZTGASEN et AND TT oGT 012) KSOACTID= <SIACTIDEISOACED) 
TECTFGAWNE.L) KSONCTYD =KSOACIIDFISUNCIND 
IFCIFGHeLE od eAND IP eG o12) FCALCIID= TCALCIID*FISOACTII) 
IFOCIEGA SE Veto ANDeET oLE12) ICALCTIDV=TCALCIT +I EMACTTD 
ISDACII) =9 

CONTYNUE 


APP=F= 4 = 17 
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RETUZN SRR 
‘99 «CONTINUE 589 i 
< ERR 49C i 
> ®OINT NIT TITALS FIA “TLE PACE a4 i 
ae eter 4532 
MO 270 I[f=t,12 29% 
JOUTITID=KSIALTID. AND. MASKS AG | 
IF CIT .GY¥.%) GO FO 220 5ag i 
JOUTCIT#12)=LS04(1e TT) -AND.“OSKS £96 | 
JOUTEIT#29V=L 50002, IT) oe AND4ASKR 397 
JOUTOII#2%;=LS90(%7, TI) AND, YASKA 598 
220 CONTINUE 5939 | 
WETT=(8,2505) T3T%, sour 700 
"ODS FORMAT(1iky,TS,12T 10/7 (6K yeT 100) 701 
WRITE CTUNT 2091) GMESGCTD pF=19 S09 MESTEC IDE Me SEC10) 792 | 
wOTT>(IUNT,2002) 7C? 
WRIT! (TUNT,2003) 7oh 
NO 100 If-4t,13 706 | 
TF CKTANC(T I #5) 6GT.2) MOUTCI,IT) sOKKKE KSPNGTT 45)) 706 
200 CONTINUE 707 
MO 12C IT=i,8 798 
NC 120 JS=4,4% 799 | 
LFCLSANC SSID) eSTe ld) MOUT (StL yg IT) => KXY MLSANG SG, TDD rit 
+2€ CONTINUE 711 | 
NO 1°%C If=i,6 71? 
IF CKSAN(II) eGTe0) YOUTCL1ygIT) HEXKK(CSAN CIT) 713 : | 
130 CONTINUE 714 | 
NO 1460 IT=1,8 715 | 
TFCLSDACL oS IL) oGTold MIUTCA,TT) =SHTEFCLS9% C1511) 9-45) 16 
00 160 JI=4,4% 74a7 | 
IFCLSORK SI g LT) 0ST.) MOUT (II F6y TT) = HXY ILSDA (Jug ITY? 718 
+40 CONTINUE 719 
DO 150 If=i,6 720 
MOUTCII# 14,1) =KSDACIT) .ANDe4ASKR 724 
MOUTCTI#1155) =KSIACIT4#6). ANT .MASKA 722 
IFCKSDACTI) «GT el) MOUTC(TI 41! 5 3)=SHI= TK SIACTID 9-45) 722 
IF CKSOACIT#5).GT 20) MOUTCITHite 7) =S4TET(KSIACTIY +6) 4-45) 7 2% 
TECKSOACE IV. GT.9) “MOUTCLIL 41s p20 = XXe(KSMACTT)) 725 
IFCKSOACTI#35) 6GT.0) MOUT(TI#11 5) =FXKX CKSON CTT 469) 726 
150 CONTINUE 727 
00 1f0 If=1,10 728 
II1=NOUTC IY) 729 
WRITEKIUNT, 2011) IT, (MOUTO(T, IT),T=1, °F!) 72¢ 
ZOL1 FORMAT (2%51292H "gt liXygI 3) 97H * gT3p1XyIby 734 
#1X—T7oiXoTSeiXoTly 3H * yTuy7H * Ti} 451K _T9)) 7%2 
1350 CONTINUE 733 
09 170 Tf=1,68 73% 
KSANCITD=C 736 
IF CIEGT. 44) GO TD 176 76 
KSNAC II) =9 737 
479 CONTTNUE 738 


APP=8= 1 = 16 


POY TES mene 


43 
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pene 739 
> PeINT OUT CALI3RATIOV DATA SUM¥ARY 740 
pt ae 744 

GLEPA=G, 74? 
TFCSAHIFTCECAL (1) 5-45)4E9.0) GO TO 27° 743 
GLEPAE CE XXX CTOAL C3) DF XXX CID AL (2) 7 CE KKK AT CAL C3) BE XKK 7 KL 
+ (ICAL (GIP I/FSLEP 745 
"73° CONTINUE 74R 
WRITT(TUNT, 2096) 3ZLEPA 747 
C008 FORMAT(//5X,*LEPS SALIGRATIIN DATA. 12 CHANNELS 4TTH* 748 
+® SUMS AVEPAGES + YUMBE®D OF OBSERVAT TONSF 749 
+/SX,*LEPS SAIN IND=X = *, F125) 75 
99 260 If=t,1¢ a 
JOUTCITD = ICALCIT) .SND.MASKE 752 
JOUT(II#¢12)=6 75% 
IFC ICALCIT) oGTet) JOUTCLI 12) =F XXX ("CAL (ITD) 756 
JOU TI TI#24)=SHIFTCTCAL (IT)9-45) 755 
240 CONTINUE 756 
WRITECTINT 2007) JIT 7c? 
2G07 FORMAT(SX,142Ts) 758 
WRITS (LUT 2008) 759 
2° G4 FORMATiZ75X,*P = ALOHA CALT=RATION VATA, A CHANNELS* 760 
#* FOR COINSIDENSE “ODF, FRONT AND 347K DETECTOR) 741 
90 250 [f=1.8 762 
JOUTETT) =9 753 
JOUTCIT#3) =3 76% 
JOUTCIT+16)=0 765 
TEC ICAL( A, 1L).GT.9) JOUTC TID =F XXXC SSOLCAyITY)D 764 
TEC JCAL, ID) oGT.G) JOUTCIT# BY =FXXXi JCAL (2, ITD) 757 
TECITALC3,IL) GPG) JOUTCITO1BIEEXKXC (ITAL CB,IIDD 7A 
©3533 CONTINUE 769 
WOTTE(TUNT,2009) (IOUTCT) I= 1y 26) 776 
7205 FORMAT(5%, 818) 771 
NO 240 Tf=1, 44 772 
ICAL( IT) =4 773 
759 CONTYNUE 774 
RETURN 775 
ENO 776 


APP=P= 2 = 19 


a 
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P2OGIAM FS2OMAI(BFILE ,CFILF y= MFLEsYF" _E, OUTPUT, 10 
#TAPELSRETLE, TAPEP=TFILE,T APE GSEMELE, TAPERHVEFTLE, i1 
+TAPFS=OUTPUT) 12 

DS FAD eR ET EEE REREARE EEE EKER EER EEE RE SEER TERE EEE EE EERE EEE REE 13 
| TERE e 14 
§ £975 PROGRAM. Fe 4°LEMANe LAST ALTIPATION 2° FES 75 15 
> 1975 FQNM S2I9MAD 18 NEC 75. 1F 
Speer 17 
Te eeee 18 
& FFA COUNTS MASTER F2AMES PEP) 1a 
> I7T3) COUNTS SESONIS FF DATA PROCESSED, ras 
Ch Rete 24 
peeees 22 
ZS PROGRAM REQUTPZS 55392 OM STORGGE FOP LJATVING. 23 
Se eere 24 
TR eeueeey SS SCE KEEFE RSERE RE BREESE SLLR SESE EEME. BEEKRHL EERE RAE 25 

DIMENSTON =4E9039). THE DC Z0)-KOAT( 27.183 gL ANN(1C0) y 2F 
+ JOAT( 65) ,L IAT (4,8), ATT (2516) 5 TOAC39),LABL (7) 27 

EQUIVALENCE( FYHEI,I4F 1) 28 

COMMON/USEX/NMAX pISQINT gy IWHAT, ISOUNT »NOOTNT yg TECT L145), 29 
#LV 045) 8.944 (16) 537 TACIE) gSISBFRM(15), WOONUM (14), 7f 
+ZTOTA,ISALL 33 

COMMUN/D_JUTZ RLV (15) pDELT_V( 16) gR-=EST CLAD gs YLTECI(15) , %? 
+ ALFLVX(15) sALELVYV(16) yALELVZ CLE) ,AL> 4EX C16) y ALEHEVI16D, zs 
#+ALOHFZ(15) zh 

COMMIN/SOITALL PT pTHOPT PN 2ST yg ST eo eM! 85 

COMMON /TIME2S/ STUB), TTC 8) 346 

COMMONS I CGEDG/NMES4 yy THETA gXTOTA, AN, XLT gXLG gALT, XLT, 37 
*XLGM 33 

3 39 
Ceeere af 
> IMIFTIALTZE FILES AND 9M CONSTANTS &t 
Si eee 4? 
* uz 

IODAT=OAT=(AJAT) au 

ITIM=TIM= (CAT IM) 45 

To=S=C09OND(722) 46 

2OL4 FOPMAT(14494Xo*S3=-2 PROCESSING ASGUN FOR S20MA*,5X.A1G, 47 
+5X,A10) ue 

MNEMO=SLUFTLE 4a 

REWINA1 50 

REWIND? 5: 

REWTNDG 5? 

REWINDS 57 

IPO INT=29 54 

IWHAT=2 55 

ICOUNT=235 St 

NPRINT=3359 57 

TICTZ=0 58 

steers 53 
> INITIALIZE SSE2 CONSTANTS 5C 


APP=f- 2 = 29 


£29594 S25M4A) Ces14/74 PAGES zi : 


"Be eere Al i 
2; 5? { 
NMAX=16 53 : 
OG 42 FEst,tcé Au ' 
LVCIV)=21 66 -«@ 
IECTUII=0 66 
SURFOMCII) =II 67 
WRONIM(IT) =55 BR, 
ALPHACII) =. «9 
BFTACITIV=9. 70 
“5 CONTI NUF 71 
4 *2 
pevere 3 
> SHECK EM DESK TYME SONSTANTS. 74 
>  2F AD TAF FELE HEAJE2 PECOPN, 75 
on oe Th 
“ 77 
IFGA=0 74 
76 CONTINUE 79 
JSA=L Rh 
JS@=1 RY 
JSCe! a? 
TCT1-0 83 
ILN=9 86 
IP°G=: &G 
PCALL=1 8G 
READC1) IWS, SoCs (= 4FN(T) y I=L 9 SWC) 87 
IFCENEL4)) 100,39 aA 
#0 CONTTNUS RQ 
JSD=: 90 
TEhS: 6 91 
WETTE (8, 2011) AVAT, ATIM 92 
ENCODE (30, 4O61,LASL) CIHE DCT) 5 T2193) y THEVC5) a3 
ECIL FORMAT(2%5 25 92K, ALC 1X, AR) gu 
2O96 FORMAT(141) 95 
TMA=C, 36 
IFGA=6 a7 
CALL OM(KABIOT<TINOET) QR 
ICALL=ICALLE1 99 
TFCKARD2T.LE2.1) GI TO 110 ide 
CALL TOAT3(TT,TMPRyMONyHRg Jy 05) 191 
TMA=1493 102 
WRIT (G9 2314) CITCU) yI=ty 6) its. 
WRIT! (552914) (TTI), TH=15 6) 104 
“C14 FORMAT(SK,* EM TIVES#® SIS, Mg TidgI4! 105 
see ete 196 
5 GCMECK TAPE TTME CONSTANTS Le a 
ne eee® 162 
i GMTAZFLIATCIHEN(19))/100C. 199 
TOAT=FLIAT (CLHE9(139) DZFLOAT(THEO(29)) 717056 11¢ 
; GMT 7° GMT L=F_LOAT( THI OD (1720) 4T2AT 111 


rite we 


APP=A= 2 = 24 
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| 
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TFCIHEN(390).NE.SL32FILE) STOP 
THENC3O) =SLIFILE 
CALL TIATI(I Ty TMA, MON, FHEN(27) THEN 269 5118) 
WRITI(8, 2015) (IT(E),L=15) 6) 
WRITE (65,2015) CITCY),T=1,6) 
2615 FORMAT(SX,*fAPE TYI4FS*,S515,7R,710,1%) 
1001 FORMAT(141,7810,F15.3,F10 019 5X 9A 0) 
20 CONTINUE 
pe eee 
> TAD MASTER FRAME 
Seer s 
PEAN(1) LWS,IGC, CC KNAT(T, J), TH1,I WC), J= 1,760) 
TFCEXF(1)) 169,35 
ze CONTTNUE 
ICTI=ICTI4+1 
HR=(SMTZEFLIAT(KOAE (1,1) d *TRAT) 3602. 
KNAT(27,13)=10HRALK PECONPN 
CALL TOATSCIT, TM y43N, HR, THE N(2€), 113) 
KABOZT=KTS02T=0 
CALL OM(KABIRT,KTIIET) 
IF (CKARBOZT.EV.1) SCO TO 12116 
IF(KTAORT.EI.1) GO TD 512 
ICALL=ICALLOL 
IGC=1GCe#L 
KOAT(27,7355) =104ATT RECORD 
at CONTINUES 
CALL GEOGA(TM) 
IFCISALL.NE.3) 59 FO 60 
FHED(9) =4LT 
FHE OC 12) =XLf 
FHED( 241)=XIITA 
FHED( 22) =9M=2G4 
FHEN(23)=THiTA 
FHENC 24) =XL3 
WETT= (02) JAS ySGS (FHF OCT) gT= 15 SWS) 
re CONTENUE 


<a ees 
SETUP AND PRINT OUT F7HEMERTS TNE ORMATE IN 


eseany 


IFOMAOOCITI1, 4) NE?) GO TN 41 

TF CISA CE VL IA ANN SS22EQ2C) CI TN 41 

IUN=TLNG1 

IFCMONCILN,50)-NE.1) GO TO 4&0 

IPG=TPSet 

WRITE(8,2001) HOyMON,ADAT,TEG 

WRIT" (Ry 2004) LAR. ,O4MFGA, XTITA 
27696 FORMAT(SX,*#IRBIT FV = FeZA1C,LIX,FSAFELLITE RT. 

#® ASSENSTON = © ,F15. 35° INCLINATION = *,F10.3) 
PECL FORMAT (1427/75K,#S3-2 FTFHEMEPFUS FIR, = 1. okey 


APP-R= 2 = 22 


47 


en CS a = ee ee 


PAG? 


22 
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Hike ALO 7Ke*SOMOST=® FUN OF ©,A10,7K, SPONGE VO. *, Tu) 162 

WOTT? (55,2052) 1446 

753? FORMAT(/T 25, ¥GEICANTPIC*®, Wid y*GEOMAS VETIS9S 165 

+1 CK g* TIME* SP 2T,*LAT™ yT3Cy*LONG*,TS%, FAL THe, TGR, L646 

+*¥THETAFSTS 9, FLATMY op TSB og *LONM# A T77y FC KMDED 1€7 

sf CONTINDE 168 

RKM=>NM#®1,35 325 149 

WRITS (8, 2903) TTK3) pTT CR) IT (CS) KL, XLT gAL Ty THETA, 170 

4XLTMZKLSY, UCM 172 

POD 7% FORMAT (7X yV2y2T% o> oe SpF lO ere Ie 3p SKIL ®) 172 

ha CONTINUE 173 

Ifl1='GC-? 174% 

OO SG? TIstsiri 175 

ICT3=ICT 341 176 

CALL S2U2R(KOAT C1, LT)» INATZKIOAT (19171) a7? 

2012 FORMAT 2K, T7, SIG yy ITS y 2X gp TSyTHy 3T5y 2-160 8) 178 

: ATT (4 yTTP=2ALLVCIT) *e9 {79 
; ATT (7 oT TP =DVZLTLVCIT) #29 LAC 
i ~C CONTINUE 181 
{ I13="GC-1 18? 
CALL S2HKBIKDAT (159i) pSOATKIAT (4p II2) pT ANND 183 

TSA= 18% 
ISe=° 185 
1SC=) 184 

00 450 If=i)6 ,°? 

TSA="SAtTANN(OTY) 188 

152 > CONTINUE 18g 
NO 1350 If =7,16 129 
| TSR=TSGFtIANV(IT) 19% 
q 160 CONTTNUE 19? 
00 170 If=17,36 19% 
ISC=!SC#IANNOTTD) 194 

170) = CONTENUE 195 

JS A=" 196 

JSF=? 197 
JSC= 198 
! IFCIVA.GS.30C) JSA=1 199 
TFCIS9.GF.1150) S35 72=1 298 

i IFCI7C.6T.2006) JStH1 2e1 
JSD=1SA4IS 3+ USS 202 
IFCUSO.E2.0) 50 T9 Si 203 
i Tr2= 20% 
00 5. Itei,I¥1 205 

N0 S. JIL y? 2¢6& 

II2="I2+1 207 

IMPACT IFAD =AL02 oe FATTO IS,TTI 42S 2CA 

3¢ CONT* NUE 209 

Se eee 2?4¢ 

> WSITE MSTER FRAME OQYTOUT 241 

Pt alah alls fie 


INA (L)=AL f+. Pio 


P77G22 


116 


206 
Teeeee 
> €0 


“eee 
+ 
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TOA (20=137.* XL TH.5 

IMA (4)=1I0.* XLG+ 25 

TOA (6) =100 .* THETAGL® 
TOACSD=1V 0.8 OMES At. 
IM4(3)=100.*XLT4+.5 
INAC39) 2100. FXLSMO.5 

CALL S2°<2(COAT(1, 765) - IVA, 39) 
CONTINGE 

KTROOCT=9 

TECISMNE. OG) WRIT (2) IWC gT5Cy, CCK OAT CT, SD gD at,g TWO), J=1-TCC) 
GN TY 29 

CONTINUE 

WRIT® (4,701)) ISALL 

CONTINUE 


OF FILE PRICESSIN: 


TFGA=TEGA+1 

IFCIFEGALEQ Ld ENDFELE? 

IFCIEGA..T.3) GI" 70 

CONTINYE 

wRIT= (32,7903) 

WRI T= (5,2)03) 

FORMAT (20, %=N) DF FILE CN S70MA*F) 

TYT=SECOVI(Z272)-TC 

WRIT’ (38,2099) TTY 239 
WRITS (5,5 7903) 24C 
FORMAT (2n,*TOTAL FYASESSING TIME FO2 S?7OMA IS* F103) 241 
FOOMAT(2X,*)J0838 IS TFING ARD2TED 3Y CABIRT AFTER CALL NOW*,f5) 
en 24% 
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Beet ee 


22?93S574M S2IMAN 94/14/78 


~ 


SUBRPIUTING OM CKAKRIATKTEART) 


PAGF 


TORE SHEE EEE RHEE EEE ETE SHEE KE EEER EERE SHEERS PERE SER EERE EE EEE 
“reese 


> 1978  SUsP27DGZAM, =. HOLEMAN, LAST ALTORATION 21 FEE 76 
1975 [3-2 FATA REVITTION SYSTEM, FOI IC VERSION 74276 
75 25 N25 75 


2284 0? 


a 


pe 


MAREN SUQQOUTINE OF OUTPUT MCNULE VERSTCN 74691 
BY MOOLTFICATION VERSTIN 74274 
EY MOVIFI CATION VERSION 75345 


PEAL IONTA,4U 
NIMENSTON .V(16), TF 50 (146)59T(16) 5 
SNU CLA, 7) yCOHT Cidg SP yg SPST iL a 97) y 
TRLC SPS FR2ACZV yy TOVUC 3D yg TITIAN C 7), TOME C3) yg 
SUBEIM( 26H) »HRPONUY (LE), AL?2> 44615), 9F TACIED, 
ALPHI CLE Dy XP (16), YAC15) 9770546) pA NUM (8) 
DIMENSION 24NGE C2) 


saa en oe 


CREM EES ST PESTER ER ECEL CEREUS TED SE SESEEE TE” SHEE FFAE SHS EEE HEE 


25 


Pu& 
245 
24F 
247 

2uR 
243 
60 

264 

252 
253 

254 
255 
256 
257 
258 
259 
26C 
261 

262 
263 
24 


NIMENSTON SEC C30) g KOC TOV, YUC 30) 470629), OX96 3G) gVVOC3G) ,IZ0030) 
DIMENSTON TUIMIT(3 7) sDFNOM( 70) FACT) 20 709 g 27D C30) sP¥ 90 30) ONC 25 


CABC7I,SL2(39) ySIOC39) gHxX YC (2G), THEFT ACC 39) 
DIMFNSTON OME 545077) ,0OMF GCC I) 

PEAL TITAS (30) 

COMMANSTIMERS/ ITM: Fg STIMEL! 

COMMCNZ JISEK SNMAX,TORINT gIWHAT,ICOINT,NORINTZIFCI, 
t1vy ALPHA, 3ETAZSI BF AIMYWOONUM, XTCTA,ISALL 


COMMIN /TVSEOGS IME GyTHET gXTOT RO, AC LT y AXLGyAALT, XL TY, XLG™ 


OUIMENSSTIAWN JTIMES(39), JTIMEE( BD, JTIA=P( 8) 
COMMINSOITALL/ PL yTHOPT RO gM? ySTgCIg dy MU 
COMMEN/SSPE TNS OME SAS 


COMMON/SIOMNATN/X7 90 7 27g KDZy¥ O7 pZIZ 4 D= Ny FAC, OVeg RNy Ay TOTAGHKY, 


C OMFGAP,OVEGNT 2” 
COMMONSOUTIITS XyVy7oXDgV Dy? VyRyTHET 
COMMON/OUTNAT/ESSLNN, ITED BN 


267 
Z6R 
26a 
270 
274 
272 


27% 
27s 
276 


274 
279 
28C 


COMMON/JIUT I. SSP 90> oSSygoSSy STpST pRNUQ IME SAgPHI Gg PSTOy2HIMZPSIMG GS 


COMMON OL IVI PLL VLG), DEL TLV (16) ,RL=ST(16) ,OLTECT(15), 


¥ ALFLJX(15) 9 45L°LV¥ (16) yALFLVZ701L 6), 
~ AL PHT X19) 59 ALOHEY (16) A LPHE 7{( 16) 
DATA TOF=/55./ 

MALFI = 9.90 

Ji = § 

KTAaN?T=9 

ICTE“=5 

FFUICALC eHEe ly os OC Sf 


se eer 


7 TED ERPOR TINTROL SCINSTANTS. 


A 


Pa ee al 


KAST= 506 


APPaGe 2 = 25 


50 


282 
283 
PRG 
24S 
2 BE 
287 
PRR 
?aQ 
297 
291 
29? 
2ay 
79% 


eee ee 


BYOS°4M S20M4) Co414778% 


-? 


ee ee 


wo RP KD C2 


2s? 


ca ae 


ee ee ee 


R262. CPCI LD 


” 


LART=6L9 

KCOUNT=9 

EPStNN = .9G000CCC4 
LITFORN = 25 

PPTNT 10414 


154% FORPMAT(139419UTOEUT “MODULF = 3M) 


PT= 3, 1415923535397 2 
THOPY = 2,821 

20 = 150./PT 

NP = PT/485, 


*1OF4MUH14076450009005 00035. 


0=6076.1155 


MU=1. 40764952156 
PFAD ALL DATA R-AYTREN FIP THE QUTPUYT MONULE. 
NITATIOCNe oe 
INPUT SATA SIPPLITEN Ay FXOESTH- NT E<- 


PAGE 26 


295 
29F 
297 
798 
29a 
74K 
791 
r22 
393 
$C& 
i Se 
396 
337 
tor 
?7ra 
318 
312 


NYAX = NJIMBER OF EXPERIMENT=2 WIRNS FCR WHITH ATTTTUNFS 


O2 FPHEMERTS FS REQITOH, 


24% 


LVCT) = £1 IF LOCAL-VERTICA. ATTITUN® FOR worn T IS 


REQUIPEN. 
ITHE SW IS=. 


TEST CE} 


= 1 IF €CY ATTITUN= FO® WORE T IS P=9QUTPEY, 
= 0 OTHERWISE. 2i8 
IP<INT = 2RINTOUT SPE CUENCre SANTOONL 713 
-1 = VEVEPR 329 
C = VERY NOP TNTH CALL 721 
8 = EVERY CAR. Pes 
TAW4HAT = SONTROL FSR OLFETHITON SOSINES ANI/9% 373 
QT. ASCENSION ANO SECLINATION OUTPUT 724 
IWHAY = 1 + OFR COS ANLY 2 ig 
JTWHOT = 2 = _A™“DA ANN OFLTA ONLY ie 
TWHAT = 3 = 2074 77 
SYJFAMCT) = LTOENTIFIER SF SISB=RAME IN MAIN FRAME <9? 
4929 Te 729 
WRINUM(CT) = IDENTIFIER OF ADZM NUMRFR IT IN SURFRAME, 
AL2HA(IT) = FIOST FILE? ANGLE NEFINING ATTITUDE OF 
EXPERTIMENTFRES FAITH SENSOR Were Te SATELLITE 
JONNY AXES. $55 
BETACTI) += SECCNN =ULER ANS LF. 33s 
INPUT DATA FOOM FSTIMATION NOVILFE <= $35 
NONU = NIMBER OF SOEFFICIZNTS FOR CURVE FIT OF NUL 
NOPHT = NUMIER OF SOEFFICTZ NTS FOR CURVE FIT CF PHIM. 
NC7ST = NIMSER OF COEFPFECIINTS FOR CURVE FIT OF OST, 
ONJ = SVE FFICIENTS CF CUP VF FIT FOR NUs 339 
CP4t = SREFFICEENTS GF CUSVF FIY FOR PHIM. 346 
SPS © SYEFFICIENTS CF CusvE FIT FOR PSi4. 74} 
QNJAVG = LEVERAGE OF ALL VALJES OF Nile 242 
T4ivG = AVEPAGE OF ALL TY4°S THAT HORIZON SEASOP 
LINE OF STGHT TS (LONG VERTICAL. 744 
IMEGAS = AVERAGE SPIN OATE 745 


APPac- 2 = 26 


51 


™15 
™1é 


San 
“<0 


TS 


se 


4 
i 


a 
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1? > VIME AT WHICH INIF TAL EMPFHERTS DATA APPLITZTS 
74u7 

PRINY 2534 7aR 
Co FORMATOS/1LH 294M TA SUPPLT= SY EX =2ITMENTED /) 749 
7or 

OT AD T4E FXOTOTMENTEO*S VATA. S62 
752 

PRINT 1220, CITIME'NCTD T= 105) 753 

2. FOOMAT (AX, 44VEA2 gf > 9 4X yg SHOMY yg Ty GX ye 4HIVUR ST Zy4X~GHMINUTE pT Ryury 
C 7ASESONNS, 113) 755 
SP LRE ANS 91260) NMAx, IPPINT, IwW4it 355 
Qc FOOMATC3I 2) 3S? 
TFC TPPINT. Gl.) NIX TNT=ATPRINT BSR 
YaTYy. =. 3 259 

NO 15 I = 1),NMAX IHC 


LST LREANCS 91010) LVCI), TETICY), SYFFOM(T) , WRONUM(T) , oh4 


i 
ae 


. 


1 


a3 ALPHA(T), SF TACT) 742 
12 FORMAT (272, 6x6=10.0) 253 
TATT) = TATTD # TAYVSELVETDD # TARSCETCT OTD) teu 
PRINT 4500) LVCT), TECICL), SUBFIM(L), WRONUM(ID, RAS 
FALPHAC TD oy B3°TAsT) 265 


10f FORMA TCI» SHUN »9 [ly 2X,sHECI y Ely LEK, 367 


* 3X, 7HSUYF IM ,’ Fu, SKy 7HW2TNIM : FS.0, 3X »EHALOHA 
. Fed TH pSHSE EA » 77.3) 749 
378 

CXQPEST FO2 THE LOCATION OF THE 499V IN THE DATA FRAME, 

27? 

ITCT) = COSIBF2A4(TI 10) FH 205 + CAROVIMC TI W109 * 466281 259/100". 
ATCT SSJ3F R41) = 2.5 774 
CONTINUE S's 
376 
RSE SESE REEEET SSUES TLE EBERT ERS TEE t77 
F-AD THE ESTIMATION MODULE CATA, 772 
THIS IN°3T 3L9C<K PINCHEN FROM THE FL4, PROSRAM 379 
@-AD IN THe FO4FMCOINES =ROM EM Tae 

i 
POINT 113 3R2 
12 FORMAT(CS/S/1%,244908TAN SUPPELT=-D BY FSTTMATION NODULES) 38% 
Tau 
KARNIQ = 1 TRS 
CANT NUF TAGE 
REAN'H,1091) ADM 297 
FOOM.T(BALO) 3BR 
FORM TUOXK yg Toy aX oT 7y GX yg LAy 11% y F2yg1NXy I 2y 21Ky T7) TRG 
IFCEYE(G)) 565557 796 
CONTT NUE 391 
NFCOVE (8 Je 4901,41I4) KAPDN 292 
FORM. T(73%,f 2) 392 
INTE™“SICTEMEL 794 
IFCI°TEM.GT.5L) GO TO 640 rac 
LECK* ROWSVEs 2) 30-16 50 796 
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DECOVE(SO,1106,40I4) CUT IME= (1), T=1, %) »NVECT, KARDN 
ICTEM=0 
JEEMEE (SH = 8 
JTIMFE (6) 6 
PRINY £220, CJTEME= CL), 224,35) 
CALL TIATRCITIMES, = TMM,MON, AR, UN,U TD) 
JTIME UCL SITIMEE (1) 
JTIME UC?!) = IT IME= (2) 
JTIMEUC3) = JTIMEZ (3) 
JTIMEUCG) = ITIMES 04) 
JTIME USPS JIFIME= (5) 
JTTMEU(5) =JTIMEE (5) 
JTIMEU(7)= ITIMEE (7) 
JTTMEUCS) = JT IMEE (8) =0 
UO 2% J = Pt ynVeEer 
KARNSA = KAZNSA + 
READ(&, 1115) SEDC II) pg XO CII) VOCII) p72 09S) gK ACTA 
IF CKASRNSD eNF. <AFIND GO TO 640 
KARNSQ = KA29SQ ¢ 
RFADNCG 2.11250) WICIID,DVE( Sst -D7C( SID, KAPIN 
TFCKAROSD .NE« <A2IN) GE TO 660 
PRINY Gtis SECCIN +X OCIS 9¥2 CS db 4 706 JD) 
PPINT 5155 IXCC II) VY¥O (IS), 970 (J)? 
FOR MAT(44 SC, F2t3.F y UH KeF 17 efi, GH 9°17. 54H fof 17261 
FORMAT( T7K yg GH N= 1709p GH FV—9F17 6S g4H 779F 1729) 
FORMAT (Uc FL 3. By Gh oe FL Ge big Xp FL Ee ry BX, Fi be hy 1% yo T2) 4&2? 
FORMAT ( 21X,F 16095 Xo FF 1Ge ty 4% yi 6.9, 1%5 12) uP 
CONTINUE ue 
KAROSQ = KA2NS) + 1 425 
PFEANCG,1125) TLERST,TTLAST,<APAN 4 26 
IFCKARIS) eNE&e KARIN) GO TO 6560 LAT 
FORMAT (23% = 1303597 % KL 206 925Xy 12) &?R 
429 
& 34 
NETERMINE ORBITAL PARAMETERS FOR EAT4 STATE VECTAR a | 
4 t2 
POINT 1041 432 
O00 470 JJz1,NVEST 4h 
CALL O83TEX) CIID VY CISD op 7ECII) pOXCCIID NV OCIS) gO7E6K SID pSVENOMi JUD, 
CF ACTIRISI) » 20 (II) g FVECII) - ONO CUS) 2 AD (997 STO CIID CTI (CI) , UTE 
CTOTA™ CIS) pAXV ICIS) » THETAC CIS) pOMEGAD CIID DIMEG COS J) pJSSySECCIIYD 
CONTINUE 


LOMPUTE ESHEMERIS ZONE BOUNDARIES 
NMINIS = NVECT = 1 

ITFCNVECT «ES. 1) Su TO E605 

09 600 [9 = LyNMIVIS 

TFLIMITCISE = CeS*CSECCTS) © SECCI Ie) 
PRING 66455 ITJeTLIVETCE 

CONTINUE 

FLIMTVUNGECh) STF as 
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r 


Re 
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KNIX = 6 
FORMAT(LIXs7HTILIMIT(,T2e3h) =,E21.9! 


KAPPSQ = KAINSD + 1 

PEANCG,893) IS yNOD, IDPD,TIM1 gTIM2, Ki FON 
IF (KARNSQ .NFE. KAZON) GO T? 660 

No 61 T=t1,N9C 

EP CF wb We 1} GO rR 477 

KAPODSQ = KAINSD + 

PEAN (4,300) TILT ,J SIy KKK, TIM1, TIM2,< APIN 
IF (€ARISQ «NF. KA2NDN) GO TS 660 

TRLCT) = FIM 

TrRe(v) = Tre 

RANGE C(I) = TIM2 - TIM 

KARNSQ = KA2NSO + 1 

PEAN (4,201) TRNUCT) y TTVA (T) » TOME CTI »KARON 
IF (CARDST «NE. KA79N) GO T? 660 


JH = 9 
JU = JH & FF 
JH = Sh © 3 


LF Ci sare TIS 3d VO 62 

KARDSQ = KA2NS9 & 5 

PEAN (4,302) SCNUC Sy ID y Je JLy JH) yKAPIN 
IF (<AQ9SD «NF. KAPON) GO TD 560 

GO T* 42 


JF = JH & 3 
iL .6F. T9399) SO TO AS 
KARNSQ = KA2RNSD + 1 
REAN (4,8G2) (CPHT CJ, TD, J=JSL yy JH) y KI 20N 
IF (<ARDST NF. KA2NN) GO TI 6606 


GO T? 64 
ia = 8 
JL = JH # 4 


ih =) 0H (ES 3S 

TF (3L.6F.139N) 353 10 67 

KARNSQ = KARNDSSD © 1 

PEAT (4,992) (CST dg Tg J=JLy JH) KI PNN 

IF (€ ARIST eNF&e KAPIND GO TD 660 

GY TY 46 

CONTINUE 

CONTINUE 

KAPNSA = KA2NSD + 1 

PFADIG, 805) ETALN,= TA2ZH,KAPIN 

IF @KARON oNEe K49)S9) GO TO 6680 

FORMAT (SK yI1 gp 4X yg IL 5 Wy L2y SX eo Fl eh 565 F114. 65149X gl2) 
FORMAT (3X gH 17 el ly SX p= 1 Pol CoS XgFi7 eli 9 14X,12) 
FORMAT CAR HL 7 61D IX GEL Tol ToS Ky EL ol) 6 SX gf) 
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1G ¢ 79 


22 TONU,LOHE Lf *sS Pa ws 792) 


ee 
wey Fe SG 

SN TPs 
WOTTE (5,6 2" KAPYTNLCARNN 


ENO MET (24 ENTS E€QVOR, Tae tree NED LIMMEG ST 30S 


KARNH PTs 4 
OF PUT N 
CONTIN UT 


FENTY T4e SINES uv , : T’ WAPTART ANGL™ FTA, 


FRA = STAAL? F 

-~¥AS = EFARY * ¥9 
SE 2° 2 SIN CTTA2) 

Ck2 = 27S t2 hRe2) 

be SIVCeEr a) 

CEL COSCETA) 


>PEVI4 THE DOTLTMTNAPY TOARSENQMATFONS CORRESPONITNG 
1© INVARTONT ANGLES ALFMA, BETA, AND FTA 


"9 uw T = ty NMAX 

ALPHL (IT) = ALPHACT) + NALFA 

CA = $93 C4 PH1019°92) 

sa SINGAL Odi CI) ENF) 

CB LISCIETACI) #38) 

$A SINCSETACTPE TO) 

XPCIP = CASSASCGE? = SE2*(SE*SASCS © SEF SA) 
YPC) CSEFPSAFTS € CE*SSI*SE2] € CRRA SE? 
Z7PCT) =SSFSAFSS © SE*SE 

CON TENUE 

NBP YS NUMBER OF FRINE AL GC<S PER Pi ve 


IF P2INTIUT IS VOT MESTPFN, SKTO THIS SESTION 
KNENTM = 5 

IFCIORINT ..T. 2) 90 TO E56 

KEOnNeH = 9 

NO G41 KK = 1yNMAK 

KEANE = KOIDON + TEST (KK) & LVCKK) 


CONTINUE 

IFCK590023 .£Q. G) 39 TO 655 
KWHAT = 1 

IFC TWHAT .£2- 3) <AHAT = 2 
KDENOM = KZIORC#KA4AT # NMAY *& 3 
CONTINUE 

FOR POSITION 

KOENSM = KDZENOM # 3 

NEP = 54/K72N0M 

TFCN2P «EQ. OF VA? 


wm WAY 
oa. ee i. ae ae as 
aM PAF aX! 


| 


—_ 


2” OSTRAM S23MA% GFE/14/ 7% 


£39 CONTT NYE 
N3=NR0 
RETURN 
34 CONTYNUE 
SBR RAR BARK REMEBER ERE PARLE DEUCES RER EAR EE REE EERE RE EE REE RE 
Deen 
> NORMAL -NTR¥ POINT TO SIBFROGROM, 
7S ¥EeSE 
TORR R ERE RR PER RARER AEE DES LAER ERE O EAH EER EEE MEER HS RH EROEEEE ES 
s = FLOATCUTIVEUC7) |= JTIMET (7) 
& + FLIATCJTIMEU (EG) = JTIME=EC&II/100C0C0S. 
IF CCTLFASTHSVFPCSHTTLAST)) 57,552,52 
CONTTNUE 
ITFCKTOUNT.LT 230) PRINT £510, ICALL 
FOPMAT(424 TIME OF CALL OUTSIDE 2ANS= DF ESTIMATE 9110) 
KCOUST=H=KS INT #1 
KTEaC?T=1 
TFCKIOUNT.SE KAST) GO TO S55 
RETUTN 
GCONTTNUE 


TPUNGEGT «Ele 1) 30 TO E35 
00 675 Tf = LeNYTNIS 
IFCS = TLUIMIT(LI)D) 630,630,625 
CONTSNUF 
TJ = NVEST 
CONT * NUE 
ITFCKVOX 269, TU) a2 
WHE CY = WEVA CCL DS) 
Xu(T J) 
YUCT J) 
Z9(T I) 
XJ CTI) 
> OYOC(TI) 
> O73 (1H) 
JENOM( TS) 
FAS TIRCTS) 
RvOCI J) 
PNCC(T J) 
“9(TN) 
STOCTJ) 
Cre(tJ) 
4XY¥ I(T I) 
TOTAI(T J) 
OMEGVZ = IMIGAO(TI) 
OMECYT = IOMEGZOCTI) 
R7 = Rol(T Ss) 
KNOY = TI 
CONT "NUE 
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a START OF MAIN _0OP 541 
5 -92 
THEL=S-S=CC(LJ) 603 

OME G=OMFSA7EOMES ITT TIEL ROG 

GME G= 04535" 2) 505 

CALL NWINCTIEL,<ABIRT) RE TUINS (39) FOF 

THE T= THET AF29 307 
XTOT=ATAN2(ST,CI) #219 508 

RR=P 3°9 

2 2S B1C 

> S11 
s GCIRVEST THE TI4= FO? LOCATION IN 4ATN FRAME, 51? 
A 64% 
2 TS = O0FCs) £ S AL4 

s 615 
; FIND THE TIME =29™ THE IVITIAL TIF OF EPHEWERTS ACGUISITI ON. 
o 517 
cf FHELE = TS ‘= SES CTS) 518 
> $195 
& YPNATE IMEGA. 5290 
n Ae 
OMEGA = OMESAZ + IYVESOT* THE_T 522 
OMEGAD = IMIGAFI4 323 

ft 424 
- COMPUTES FRESENT VALUES G= EPHFEME?TS. 425 
x BIG 
CALL NWIN(TIELT, KO ORT) ,PFTIQRNS(38) a2f 

a AR 
- WAATE THETA £2a 
5 63¢ 
THETQN = T4ETA*2 BRL 

o 432 
IFC esTe NYAX) GD TI S 633 

3 F 34 
€ IF NO ATTITUIE LS RENUIREDN, GO T) 1:C ESS 
° 6346 
IFC Lvs) + TECICI)) 106, 1€2, 5 537 

> A&R 
S CONTY NUE 43y 

> A4C 

C ATTITUDES IS REQUIRED. FINA THE VALUE OF TIVE FOR THE CURVE FIT 

3 £42 
e 44 
J7 = 1 B44 

TF (NOC.EQ.1) GI TM 58 A4S 

TF (TS eST/TRLC2) ANN. TS .LELTR 2029) 17 = 2 645 

TF (WOC2EQ2) GD TI 66 547 

TF (CTS .ST.TALC3) ANVO.TSeL FoF R2C3d) 57 = 3 aur 

§2 CONTINUF 649 
PNUAYG = TRVUCI7) 556 

TVAVS = TTVA(J7) 451 
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GMEGAS = TOME (JZ) 
FTN) OMIM, PSTM, AND THE DECIMAL PAST NF NU 


TSS: TS - TVavy 
TALL FITS PHIM, 2ANGE (I7) yCPHT 01,I92)) TOF9, TSS) 
CALL FITCPAST MN, 24N SE (S70, CPST (19 597)95 19720, TSS) 
CALL FITOVESNU, PANSECIZD, ONIC1 9 I7ZV,T VP,TSS) 
PHIM = P4IMJ*®NR 
PSIM = PSIMIJFOR 


FUND NU TN REVILUTIONS. 


RNU > OMEGAS * (TS- TVAVG) / TWOPT # QNUAVG + 65 
INU = RNJ 
FINU = INY 
RNUREV = 2NJ 5&9 
CONTE NUS a7 
IF ( RNUPEV .SE, Ty = ONNZEV = 1.9 57d 
IF ( @NUR=V BLT. 2 >y = INU?TV + 400 67? 
IF ( RNUREV .5E. 7685 673 
TF ( RNUZEV LT. | 7635 A? 
575 
FINI NY TN RSANTANS, A76 
577 
PNU = RNUREVE TWIT 78 
57a 
FIND NY TN F527 ES BRE 
PNUNTG = PNIPCYERE, 58t 
58? 
FIND O4IM AND OTTM IN MESREES FOR OUTPUT aor 
BRL 
BAS 
COMPUTE TRIS FIPCTIONS OF ANGLES FO2 LAMNFL BRA 
RTHFTA = SIS(THETA) 587 
Bh 2 GVaeTA SAR 
STHFTA = STNCTHETA) 589 
ST = STHzTA 5a¢ 
CPH TM 505 (PHT) 591 
SoST SIV(PSIM) Rae 
SPHTY STV (PHT) FoR 
cesT TUS (PSIM) 594 
595 
FIN) O4T AND OST TN LOCAL=VERTICAL TOORNTNATES CPHTO ANN >STO). 
597 
SS = SOSTMEST = S24TM*STHCETIM aga 
PSIG = ASTVCSS) 599 
CS = COS(PSI2) 706 
TOP = STFSISTM # T°STM®CT#SIHTM 74 
hOT = CP4IM*cesr™ 70? 
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TEESE Ese CHsAU/7H = PAGE 


PHIO = ATAN(109/297T) 
TFCHIT) 10yt41011 
PHT G = P4EQ + PF 

GO Tr -s3 

IFC TOP) 12,135,122 
Onto = PHTS + TWOOT 
CONTINUE 

S® = SIN (HTD) 

co = 708(74T)) 

PMT CY = WHTI"RD 
PSTOY = TION 


TFCS 0 3Te. MAX) 59 TI 266 


FOND THE RIGAT ASSENSTON AND DECLINATION OF THE FXPSOTMENT ODES 
SINTON TV ECT ANNZO® LACALVFFTITAIL CHOP OTNATES. TAT 
72, 
CALL LAMIELOXPCID yy VOCS), 7OCG) yg LVEDD, TET)? 749 
75 
l 734 
720 
t™ THIS TS T4E = XFERIMENTE O#S CAST WORN FM PAIN CRAKE, BOTNF 
ONT T4= RESULTS = ITF PEIUTPED 724 
TROS olLE. NWAX?Y GI TD % 725 
LS) cs. -S 72% 
cQ TT) 4G 7a? 
77.R 
CONTINUE 72G 
7% 
SFE IF T4E RESULTS APE To BE FRTYT=EN 724 
TFC IOP ENT) 5905 300, $06 732 
IFCINOUNT = NPQTNTS %25, 357, 359 7 <2 
ICOUMT = LSIUNT # 3 7 36 
GO TY 592 725 
ECOUNT = 4 73A 
727 
OISTOUT TS VEVT FED AT THrS spre 7%, 
NIQ=NIe4 726 
IF CNS «LE LNS?2) GI TS 1 74N 
POINT 1544 "wa 
Ne =. 74? 
POTNT 1642 742 
PRINT 1042 74s 
FOPMAT (ix) 74S 
JTIMEP(7) JTIMEI(7) 746 
JSTTMED (RY JTIMEICH) ru? 
CALL TIATICITIME Dy TIMMy MON, 424 ID, 4G) 74R 
SFCGMT = FLOAT OCITIMEP(SD) ¢€ FLOATCUT TM PCBDIZTCADGLC. TKS 
PRINT 1270, (CUTIME2(I) gp JE tye dy SETOME 756 
POINT £5406, THETAD, IMEGAD Sy Xp Vo Z7—gX3yV V_9 27M? 754 

1040 FORMATCLIXLS4THETA 9£150395Xy tCOHIMELA pL eb ys Ky 

¥ LOHTT ME 9 F1ide6/ 1¢<, L7xnY 9£ 15055 TX 
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L202 


c 
fa 


MD es 


ly @ 


1GHY pF 15 eh gSX,y 1947 0= 5 .5—/ 
. 1X ,1 04x) oF 1500 95K, Lo HYN 9£ 1565, 5Ky 
* 1074 9 E13 248 9/ 1X, 19Ho 9£15.97) 
IFCIATED .LE. OP 37% TO 41S 757 
PRINT 26059, PHIMD, HTOO,RMINE GOST 4), PSION 75.4 
FOPMAT( 1X_LG4O4T 9 £2340 55X%y LVHORTO 2£15,655XKy 
7 1G°4NU attsebgf 2h, 1S HOESTM 9—= 150%, 5X, 
, LCHESTS pF3=.4) ree 
CONTINUE 752 
MO 32 JSELSNMAX 763 
TFCLVC SSD OTS CTC ISD WD, BC, 2 Tbs 
VFN TATITONE® 7 6E 
756 
ALL VX,ALFLVY,AND ALFLVZ ARE T4F NTRECTICN COSINES IN 
THe LOCAL VERTICAL COORVINATE SYSTEM 7AR 
749 
ALP4EK, ALOH YY, ANN ALOHE7Z ARQ” TSE RIRECTION COSINES IN 
THE ZAOTHMRCENT= OF DMSO ITMNATES SYSTEM i | 
77? 
CONTINUE 773 
IWCP 3 = VIINUY OCIS) 77% 
TS¥e = SJRPRAC STH) ¥Fe 
PRINT L142, LHO?0, SUS Ps, 
FORMAT(/1) xX? 54ATTITUNE FOS VO2N NUMI=Q 4 [T2,43h OF SURFOAME , 7?) 
LFCLI{5JD) 44, Gy 22 778 
CONTINUE 77Q 
IFCIWHAT = 2) 4S1_ %2, &3 786 
COUNTY NUE 7R 
r&?2 
ONLY JERECTION SOSTNFS AFE DESTS2 3 = IN LY COORSS., 748 
POTNT 1470, GLEL VK IID SBSLEL VV CJ) SALELV 7(J)) 7RL 
FORMAT( 282 544LP4A © LV tELaeig SXL0HAL FHA VW LV ElGedy 7356 
MW FKXLIHAL PHA F LV 71528) 7RH 
GS TT) 4b Lada 
CONTINYS 788 
739 
RYT4 VERECTIGN IOSINES AVA RT. ASS. AND NECLIN, ARE NESTREM MLV 
PPINE L17 J}, ALEL IK CII) yALELVY (CJS) ALE LV 70d) yay 
CONTINUE 792 
PLLV® = AEiv¢ ss Fe 797 
SLTLVI= VELTL VII PD 79% 
POINT 115), RELLVI, MTL VI 79¢ 
FOR MPT CLOCK ys LEHLAMVA LV 9 ft eS gEKy LIHFVELTA LV 9 €15.6) 72h 
CONTINUE pid 
IFCIUOCICSIV-LELD) 10 TO 29 749A" 
IFCIVHAT = 2) Gay 47, GA 7a9 
CONTE NGE ®Q0 
POMLY JYISECTION “OSINES AVE HFST@1 = IN FCT Cogens, 901 
FOTNT 11775 ALPHEXK( JJ) AL PHI VY (CJD AL PH 7055) $2 
FORMAT C2K1LF4ALOHAKR FUT FLA et, SXL JHA. PMMY ETT F 166 Ay aos 
XY SX1ICHALPHAZ CST 214.6) 206 


APPefe 2 © 25 
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GO TY 49 ane 
CONTENIE a °F 
BITH YIRECTION TASINFES AVN QT. ASS. AND NECLIN, APE IFSTOSN-Er4T 
PRINT L289, ALPAEX( ID) ALPE Y{ Jd) AL PH 20S) aca 
CONTYINYS 4oQg 
PLECEN = REZ ET CEP Fe 34° 
OVECTO = ILTESIC S/F 29 a14 
PQOENT 224535 SLE" TO. MTEC ED 41? 
FOPMAT(LIX,LOHLAMIA FCT 9 F15.6,5% 515 49 LTA ECT ,€45.63 a 
CONTE NUE -44 
CONTINUE asc 
GO T7 $0) a6 
CONTINUES 297 
KA IANRVT=1 aaa 
TFECKSOUNT.LT LAST) PRINT 206 t,KCOUNT, K/AT asa 
TF CMONCKT DUNT £200) .E92G) CPINT 2002, <COUNT, KAPT a7e 
FORMAT (2K ,™=<COUNT*,TSy* KAtT*, IE) ary 
CONTINUE a2? 
di = NMAX Qa72 
PETIDN 476 
SAIn e2c, 
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SUBR UTINE J28TOX gt ys 7pXD yg VM, ZO gNENO4M, FACTOR, hy Rh vg RN, A, SIOQCI 1, 
TIANTA-HKY, THETA, IM= 5A, 0MEGOT, ISEG, SE*) 827 
§28 
PEAL IVTASNeMUST STAN R2Q 
COMM NZ OITALLZ PLT ROPT SRO GN? y ST yp ST yt 9M! R 3C 
COMMIN/OMT OSL INO UT-L OUTPUT Qry 
X= X/* azo 
¥=Vs- sts 
Z=2/. R34 
XD=XV/E 83S 
¥N2¥97°5 834 
ZN=TVIG Sd 
ATR 

TOMPITT CONSTANTS FOR CIMOUTAT. IN QE THETA, OMFGO, IOTA 

R4C 
R&t 
OTK DEE Sey TEE He THRE?) £42 
XVFVE VIET F7Y 247 
LARP CCR eS Sa sy 52) 8 4b 
i ck Sala 24S 
Knee 7) RUG 
vV-Y* KI 247 
SORT (He *2¢ 47 ¥¥7) RUB 
34 
ASC 
TOMPITE THETA, TMFGA,TOTA ss4 


SAMs xXsSHCyY 

COM=<HY/4XY 

ONEGR= ASTIN(ST) 
STO="4XY/4 

RIN=47/4 

TGCTA: ASINGSTO) 
STH=CZFHDS 094% 4X) 

STH Y*AK=—KE LIVI 7s (2 FKY) 
THE TA= ASTNOTTH) 


YYUANZANT LOSTT FOR THETA, OMESA,T IT" 


TE CSM 5 eo Ge TeANYVS [OMe GES G0) OMEGA: IMF GA 

p ame | TOMALES G69) OMEGA= 77 -OMEZA 

TF ESTM el Eee CoANIL TIM GES Co.) OMEGA: 22° PT#9MEGA 
TFESTOeGC ec Tet eANAeTIOsGE. Gel) LOTASf WTA 

IF ¢ DTOeLEef.5) LOTA=%T-TOTA 

TF OS Del eGo Oe AND SING F ee Uel) INTAH2?,* 7TH IITA 
IF OST HeSHte ce Ce ANT. THe GEe Coit) THE TA=TH= TA 

TF ( TT4elL Fede) THETA=2>T-+T4FTA 
TFOSSHeL Te Fe Ge AND. STHOGE. COT) THETA= TW OPLITeT HE TS 
BE2Q/(PemVEGEFS/ (MITTEE BY) 

N= SIRT F* 3) FAS 9145 


APO=P~ 2 = 27 


F"Jo?2 4M S2UMA9 06/14/73 PAGS 38 
IN=N 477 
FACTOR = 14*R7A 878 
ECCENT = SIRTCFASEORFFAC TO? + R¥EQLIC~ Ft7(AFMU)D) R79 
NOMESA==FWIPT*.001524* (20 902900./6719) §¥2* CASCIOTA) Pac 

C 0.0 - SSCENT EEO) BF 361 
TORBY T=TWOPI CN RQ? 
OME GATHOQNMESA/STORRIT RAZ 
OMGNTD = IMEGITFERY Ray 
YOTA? = TITA*EON 386 
RNDES = IN*¥2AD RAF 
NENOM=LESCAPAF RV) RAT 
NOMEGAQX = IMEGAF2N RAR 
THE TAD = THE FA*I9 RAG 
WRITE (LOUTIST,9I9) TSEG SEC, THETAD,IAETADZIOTADSOMGITN Py vy QV, 

G RNSES, TORS IT, SCS NG aQty 

Se FORMAT (3K ,R4SEGMONT 41751 6Xy BHTIME SELSe DG, SXgH4HTHE TAD £1569, 

5 3KX,RAOMESA 9ELG ee GgK gp SXg8HTITA 9E15¢9y3SXySHOMEGIT 

G 135035 3K, 342A0TUS 97 15 29, 3X, SHV EL OS ELS. Gg Sgr Xy 

3 B49 DOT Vv gH lao Fe XgX HMA MONTN 97°15 69g “XgBHPESINN 4gFL&e Ay 

& 3X ,2HECSION g2 2097) R OF 
SFTUIN a 97 
ENN RAR 


Lathe 


es ee 
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SU3R UTINE JFS2(C1+C2eC3_,N07%4T0R) 899 
> PERE REREREE EERE EEE EEE EER ERE EERE SEER EEN POEM SEER EEE EEE EERE ERE SEY 
5 PRIN'’S NU,P4I,°ST ARRAYS IN COLUMN 702” 301 


RMSE BERBER EGR ESE OR ERR SESE RA ERR BELEK CEOS HERES EEE EREEEE EE CREE YE 


aia 


NIMENSTION 3101653960 2016.3),03 (15,3) 303 

¥, 904% 
PRINT 1039 905 

1G9C FORM*T (16X24NU,y2 7% 7HPHT gp 2FXSHPSI/) 90 
00 1 T=1,N9> 337 
WRITF (6,960) Y,N93 904 

30C FORM? T(6HOCIRVE,I2,34 OF, I2) 909 
M0 2 K=1.1920 318 
WRIT (651061) G1L0< 91) C2 (ky T) SB CK, T) 311 

2 CONT * NUE 312 

1 CONTINUE 913 
RETU?PN 914 

2001 FORMET(5K5139.%,10%=19.8910K=19,.8) 915 
ENN 9164 


APP=8- 2 = 39 
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SUBSOUTINE NWINCTN? KACORT), RETURNSEN) 
RFAL TOT’, 


COMMONS DITALL/ PL gS AOPT, 294024 SI ytI pty Ml 

COMMONS OMNATN/X 906 9 20g XD79V 07g 297, DENIM, FACTIRGRVy2NGASIOTA 
5 OM GA7,904=G69T,22 

COMMON/SOUTISTS Ky ty Zy DX gVVyoVZy @yTHEFA 
COMMIN/OUTNWTZE2S_9N, LTE2 aN 

COMMON/ OMT LINPUT,LOUTPHIT 


= SIN¢ THETA) 
= COSC(TH= TA) 
THETA |= FACTI2ZFST # RVFC1,. = STH FEYO NOM |= RAFTNO 
te - FACTOSEST + OVFSTENENOM 
IFC ABS(=) = EPSLNN) 5, Sy, ? 
IF CI = [FERIN) 35454 
THETA = TFHera = FER 
| A ce A a 
EC. 7} = 
CONTINUE 
Fad el tAF(ST-H1.00 7/26 
G= (ST#RNETNZ=THETA) S2N 
= FXO 45°07 
T¥vO+Gty 97 
=*7C45*2Z07 
SAIRTCKEX © VEC © 7F7) 
“AFAFQV FEST (24 PC) 
4c#AF CSF — Tah FR 
FNC & GNEXD?P 
FU¥YSO © GHEY? 
FHNEIFD e GH* 797 
YOO? = OVEZ 
Z¥O¢ = OZ7*XK 
STH = 7/(R*¥ST ) 
CTH = (Y¥#4X | X*¥HY) SZ (CR¥HX Y) 
THE TA= ASTNISTH) 


™ 


nN A 
oO 


es ARE a oe eo 
<™«<xwN<x J 
oe ee ae ORO 


IF CSTH.SE Ce UeANDS TTHe GE. 0.0) THE TAS SHE TA 
IF ( STHeL&eOef) THETA 2T=$T4HETA 
IFCSTH LT ede Ce ANDO TT He GE eC.) THE TA=FWOPLT4e THETA 


KAS8CPT = 3G 

RETU2N 

WRITFCLOSTFIT,100) F 

FORMAT (G34 VEWTON-2 SPHSON NIES NOT TINVERGE. VALUE 
KARNRT = fi 

PETUZN N 

ENO 


Appear. 


22IGT AM S29MA0 0F/14/78 


SURRIUTINE PATICEL) IAT 
Z JAR 

COMPITES SECONIS ANN MICRCHSECIVNS SINCE 1969 QFY 
37° 

NIMFNSIOV L(8) id 
372 

INPUT 373 
374 

L(t) YEA? 375 
Lié2) nay 976 
L(3) HOY 377 
LOG) MINITE 27% 
(5) SECONDS Q793 
Li6) MICIN-SESONAS gar 
QR4 

OUTPIT QR? 
982 

£7) SECINIS ARG 
L(B) MISP OSS ECOINAS ger 
39h 

NVEA® = MODUL OL). 200) 337 
a3 

Le) BGS) gra 
L(7) L(5) #4 GGFCL(G) @€ FOF CL (3) © 26F(L (2) + (NVEAR - FQVZ4 - 
+ SESFPOCWVERS = 759 FP) 994 
RPETUIN 392 
END agt 


oo sa 


S209 09 


ao 


APP=F- 
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SUBRIUTINE TJINACL) 294 
; 2435 
0 COMPUTES F29M S=CINNS AND MTICRO“SECIVAS SINCE 1969 29h 
g 337 
DIMENSION Lé 8) 298 ! 
rp 239 7 
§ OUTPIT 1306 
f ice 
c L(1) YEA? 15902 | 
fe L(2) DAY acce3 
op L(3) HOU? 1°74 
5 L (4) MINITE 1205 
° L(S) SECONDS 12°¢ | 
iy L(6) MIS2I-SECONIYS 4327 | 
5 10 9R | 
i. INPUT 4009 
¢ acie | 
L(7) SESONTS 1313 | 
| c LOB) MIC2ZI-SESCONDS aci2 
C 1043 | 
NOAY = LO7)7 A605 1214 
NYEA2 = WIA 365 1915 
LCi) = NYEA2 # 197% 1716 
G2) = NAY = NKSCASVSES = KNVYEAR # Lhe + 4 qe47 j 
TFCLU2) sGEi 24 GO. Fo 5 1018 
Etsy =o C45 = 2 1°19 
L(2) = 366 1c¢20 
; 5 CONTINUE 1624 
JT = LO7) = NDAV* 85400 1022 
L(3) = JT/3500 1°23 
jt = JY = Lesyeseac 1724 
Li&) = JT759 1625 
JT = JT - £LO4)*50 1024 
L(5) = Jf 1027 
L(6) = L(3) 1628 
QETUPN 1°29 
END 1070 


APP=A- 2 = 42 


t. Sa 
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SUBRIUTINE FITCDUT, T2,CO, t0,T) 16 34 
INTESER YALE 1232 
DIMENSION 33 (16) ic 3% 
COMMON/OJTALL/PL sTAOPT sQ0yN2ySTy ST ys MU 1034 
HALF = 1972 1635 
OUT = COCA + CDC7IFT *& COL3)FTE*2 & CO(H)FTESR 1°36 
00 1 = 3,4ALF 1037 
xX = tC] = 2EFTwOoPrersTeR 1038 
Ko = 22) = 7 1939 
OUT = OUT & CUCKD® CIS(X) * COMKEL)*® STNOX) 104C 
1 CONTENUE 1044 
RETU?N 104? 
ENO 154* 


APP-2- 2 = 43 
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SUBROUTINE LAMDEL(XP,YP,ZP, Vv, IECI) 1044 
> 1245 
TP REE MERE RAE RE MERE MERE EE ER ERE RY REE EERE EEE PERO EEE ER ERE RE 1° 46 


1947 
GIVEN PXTG, POSTS, NUy ETO, ALPHA, BOTA, THETA, IOTA, AN) 
JMEGA, THIS SUBRIUTINE CY4PNTES THE RIGIT ASCENSTIN 
ANO DESLINATELON JF THE ECPERIMENTERS SENSOR IN 1059 
ZCI AND70OR LOCAL VERTICA. COORDINATES 14951 
ALSO ALLOWS FOR OUTPUT OF NTRECTIOCN COSINES IN 552 
-OCA_L V=RTICAL AND/NR ECE SOORODINATES 1053 
254 
SERRE SaREERERS ESSERE EREEREE SHR EERSTE REEEEREE ERE PERE EERE RHEE EEHE *~ Ss 
1054 
Looe 
REAL I9T 4, MU, NUE 1658 
COMMONZOITALL/ OL, TAOOT RO N2yST sl ys MS 1°59 
COMMONS OUT I_7SPy C24 SSyCSy STy CT yPNUy YFG AyPHIS pPSTGy 24IMy PST, J 
COMMAN/SNLOUT/RLL VC 16), DEL TLV 16) y PLE T1416) »ALTECTCAS) y 13961 
AL=LVX(15), 4 LELVY( 16) »ALFLVZ( 16D, 15 62 
ALPHEX (16), SLOHEY (16) y ALPHEZ( 16) 1°63 
1754 
1055 
1746 
COMPUTE THE PROJECTION OF A UNET VESTIR ALEGNED WITH THE 
SENSO ONTO T+5 Xs V5 ANY 7 RAKES IN THF LOCKE VERTICAL L068 
COORDINATE SYSTEM, 169 
COMMON /DUTIUT/ Xl yZ79 0K NY, CZ yRy THETA 2 a ak 
Cn = COS CIMEGA) 1071 
SOQ = SINCOWEGA) 1672 
XE0 CT (SIF CSOFRY =KFSO) 4ST EZ) -ST#C SNE X*+S0% ¥) 1t73 
YEO = +I CC OST =KESO) -CI YZ 1374 
ZEQ = =SPESCS ES CCOP PSX SSOP est Zia reel Oe Kesue ys 127 
REP = =(KEO* CS #SS* CY EO*CP e750 *SP).) it 76 
ZEP YES” = 2e0" GP 1C 7? 
NUE = ATAN(XEP/7Z=9) 1076 
TFEZEPD Late 2 1679 
NUE = NUE # PI 1786 
60 TN & 1081 
TF(XEP) 354% 1382 
NUF = NUC# THOPT 108% 
CONTINUE 1tR4 
CN COS(RNUANUF) 1095 
SN SINC2NU-NJE) 1046 
XC BoFCSEGN <= YOeSs = 2PSSS* sw 1987 
YO XP#(S2*SS*CNeSFESN) + YP¥COFCS = 70% (CPESS#SVESPFCN) 
26 XOF (SPFSSFIN € CPFSN) & YOFSPESS € ZP*F(RPPON = SP*SS*SN? 
1696 
IFCLV) 59,5),5 1944 
LU%2 
5 CONTINUE 1035 
1294 


>? 


C3 cp 42¢) 


ey jit Sp al Se Ta, SY Sy} 


Te | 
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c LICAL VERTICAL ATTITUDE TS REVTZEN. ic3s 
3 FIND THE RIGAT ASCENSIGN *¥LAMDA®, AND OFCLIANATION *¥PELTAF, 
NELT_ vis) = ASIN(-270) 1697 
RLLV(S) = ATANCYO/ XO) 109A 
¥ QUADRANT LOGIC 199s 
TECXTY L1y 255 25 1190¢ 
1° PLLEVisd = RLLV GJ) & PT {10 
GO T9 40 1102 
2E ITF OVI) Sde S05 49 1is2 
ZT PLLVE JD = RLLVO I) & THOPT 11046 
Go CONTINUE pO io 
im 1106€ 
€ FrNOD THE OYRECTTON COSIN=S IN LOZAL-VERTICAL COO2DINATES 
S 1106 
ALFLIXCI) = XO 1199 
ALFLYYTS) = YG 1116 
ALFLIZ2(0J) = 79 114% 
C £242 
GO C+HESK F3 SEE TF EST AVIIFUDE TS 2=Q9 FREES. 1123 
Sg 111% 
FFLI-GIY 1665 190, 59 4115 
57 CONTTNUE 1116 
£ ETI AYTITUDF IS R= QUIRED. 1117 
+ CIMPUTE THE PRIJECTION OF A UNIT VET TOP ALIGNED wWITt THE 


SSNSO2? INTO THE Xy Vo 7, AXES IN TH ECT C€ EARTH-TENTERED 
S=NSN? ONTO T4= Xy YygAND Z AXES CN THE F ARTH=CENTEREQ-INE QTL AL 


02 4629.2 


(CI) SIOREINATE SYSTEM, 1121 
1122 
KF = =KOFCSIFCI*OT # SOFST) = YOFSOFST # 7O0*(SO*CIFST - CO*TT) 
YE = XO®(COFCTECT - SOFST) © YOFCNFST - ZO*(COFCT*ST + SOF>T) 
ZF = XG*SE"ST = YO"AT = 7C8STFEST 1125 
* 1126 
. FIND THE NIQECTLION CASINZS IN S&C SIORDINATES 1127 
ALPH=X(J) = XE 1128 
ALPH"Y¥(J) = YE 1129 
ALPH- 7(9) = 76 113¢ 
° 1131 
. FIND THE 2IGHT ASSENSION CLAMIAD ANT JESLINATION CDELTA) 
OLTE"E(9) = ASTN(-75) 1133 
PLECT (J) = ATAN(Y=/KE) 11346 
‘ QUANQANT LOGTS 1135 
IFOCX=) 60,5 70, 72 1126 
ST MLECTOS) = WECICI) + PT 1137 
GO T* 10) 1138 
7° IFCVE) BOy 105, 1207 1139 
8° PLEC' CU) = 2LECICI) * THNPT 1146 
19° CONTTNUE 1141 
RETUPN 1142 
END 1143 
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P? 069A 


1 


1 


M S20MA9 


SUBROUTINE ORMAG(NINIT, STTYME, ENDS YM, 
A®RAY, TERR) 


OF 414/74 


DEL TLT, NWIS, NUMWOD, 


DIMENSTOY =92H(50,3)5 ARRAVW(L), NUMW2YC1), TATA(5O), 


NAVEG(E} 
DATA ISTREP4S OZ, LTELAST“SCS 
DATACNWO-SiT), T = 1yH)729, 295 34, 77. 
NATTA ITFLAS/)/ 


IND = 0 
IEQR = 0 
IFCIFIRST £9. 1) 70 TO 14C 


READ FEAJER RESSRA 
READCNUNIT) TWO, Jo, (NATACT I, 
IFCEQFECNINITID &CC, 16C 
IFCIFIRST cEQV. 1) 20 TO 146 
TING = JATA( 12) 

STAFY = VATA(19) 
STOP = DATAC(11) 


CHECK IF TIME ATTHIN RANSE OCF HEX IES 
TFCSYFIME 2. Fs STAI) GO TO SHC 
EFCSTTIME .GTs STI") 6G FO S80 
IFCIEIRSST «ED. £Y SY FOrAGE 
IFIRST = 1 
GO TT. 939 


TECTSIZEAH GENs 1h GD FO eee 
FECSETIME «kT. OAYACEI) GO TO 160 
ISET = i 

0 1690 K = ty IWO 

FPH(€y1) = JATACK) 

GO TO 97 

EPCISEY «kOe 2) GI FD 165 
BACKSPAC= NINTT 

PACKSPAS= NINIT 

GO T? 90 

N0 176 « = Ly IAN 

EPH(<,2) = JATACK) 

READOCNUNIT) TWD, Jo, CEPH(L » 3)y Tt ty 
TSET = 6 


HAVE STARTING PISTTTON 
ISTREPH = 1 
GO Ts ere 


IFCSTTIME oLT. F94¢8,2)) GO TO 220 


SRLS 


RECORD TIME 


IFCTELAG EQe Le ANN. STTIME.GT.EPH(8,31) 30 TY 41C 
IFCIFLAG SEV LANDS STTIMESLESEPH(A, 31) 30 TO 275 


READCNUNTT) TWI,J57P,(0ATA(T), I=1,14)) 


APOMH-R=- 2 = LG 


1145 
1146€ 
XCM, VC), 
1146 
1149 
115¢ 
1154 
1152 
44.53 
1156 
4155 
1156 
1457 
115A 
11593 
116C 
1264 
1142 
1163 
Lt AY 
1166 
1146 
11467 
1168 
1169 
127 
Lit 
1172 
L173 
1176 
ii?s 
Li¢s 
» A He af 
1178 
1179 
1180 
1181 
1182 
LiRS 
1194 
11865 
1186 
1287 
1! 88 
1189 
119¢ 
11914 
1192 
1193 
1194 


PeNGPRM S2NMAD CAS14/78 


IFCFOFCNINITD) 246,250 
N90 210 K=1,2 

OO 230 —£ = f, EWA 
EPH(T,K) = [OH(T,<#1) 
99 250 [=1,IW9 

EPH ( 5 3)=TATACT) 

GO T? 203 

IFLA St 

GO T? 273 

IFCSTTIME 2.56, £P4(9851)) GO TN 275 
BACKSPASE NINTT 
BACKSPACE NJINIT 
IFLA,=9 

ISTR: PR = 6 

GO T) 162 


NWOS OF DNATA 


IF CNM NE. VWWOEGI4)) GO TO 710 
CALL LASYES(X, Vy STTIME, Yr) 
GO TY? 326 

CONT NUE 

CALL LAG2AG(K, VY, SYTTIME, YY) 
IND INY + 4 

ARRAYCINI) = YY 

CONTINUE 


STTI“E = STVIME + JELTAT 
IFCSTTIME «SE. “NITYM)RETUON 
60 TY 223 

TERR = 1 

RETUCN 

IE°R = 2 

RETUIN 

TFRR=3 

PETUCN 

END 


P2O532AM S29MA9D 


” 


¢ 


3 
a 
4 
1 


BE 


6 
5 


SUBRIUTINE LAGDEG(K, Vy XXy 
DIMENSTIOW X03), YC?) 
1 
2 
3 
CA3S(CYCK)-VCTI) - 3000) ty 
GOING FROM QO TD 360 
Y«K) = Y(«) ¢ 350. 
GO T) 8 
GOINGS FROM 350 TO 8 
V(I) = YOY) © 360. 
TF CARS CY CS) MY (TI) - 3000) 1, 
¥OCS? = YON) © SSG. 
XNO XX = ©(T) 
XN1 XK = * CJ) 
XN2 = XX = X(K) 
x0l X(T) - XI) 
x02 X(T) = X(4) 
x12 XJ) - XCK) 
YY = KNI/KOLFEXN2/K I 2*Y(T) = 
= ¥(<) 
IF (YY = 360.05, 6,5 6 
¥¥ = YY = 350. 
RETURN 
ENO 


I 
J 
K 
tT 
T 


F 
F 


O4414/73 


1227 
4738 
1239 
12460 
1261 
17242 
17423 
1244 
1245 
1246 
1?47 
1248 
1249 
1250 
4251 
125? 
1252 
1?54% 
1255 
1256 
1257 
XNG/KOLECNPSKA2 FY CLD & XNOSXO2ZAKNISK1L 2 
1259 
1266 
1261 
126? 
1242 
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SUSRIUTIN= LAGRAGLX, Yo XX, YY) 1254 
. IF DIMENSION OF X IS Ny THEN N=-2 'S LIMIT ON NU43=ZR OF PNTNTS 

. THAT CAN 32 INTS?APILATED BETWEEN USE NG THIS 2OUTINE 1766 

: XC LIES JETWHEN Y AND Tet 1267 

DIMENSION KC3)5 YE7) 1268 

Cc 1269 

T=2 1270 

s=2 12712 

K-27 1272 

X¥NO XX-X (1D) 127% 

X¥N1 > XX-XO09) 1276 

XN2 > XX=X (4) 1275 

KCL = X(T) -€0) 1276 

Xo2 =: X(T) -€(K) 1277 

X12 - »€5)-€(K) 1276 

VY = XNL/KOLEXN2Z/XT QV CT) - XNO/KOL*KN2/KL2*V (05) & XNO/SXG2SKNLZK12 

1 * vik) 1289 

: PETUIN 1282 
i END 1282 


APp-A= 2 = 49 
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SUBPXYUTINE S2UP3I{< OAT, JNATS<ANN,TANN) 


PERSE SSH REREERERE EERE EEE EEE RE RERE REE EERE REE ER EE REEEREE RE RE 


SUBPRIGZRAM, HILEMAN, LAST ALTO RATION 19 NOV 75 


S$3=<-2 NATA REDXUSTION SYSTEM. CREATED 18 NOV 75 


JNPACK FORMAT 3 DATA =-OR 1 SECINO INTE VAL AND 
UMPACK 4OUSEKEZ PINS RECORD (16 SEC INTE 2VAL) AT ERKTRY 
S?HK®, 


ee ee 


ry 
« 
* 
* 
* 
ad 


TERRE ERR REESE RE EE RREE EEE EERE EREHE REESE EEE EY BER ESL EELS EEE ESE SD 
DIMENSION KIATC27) -SVATLS55). ISTTCASD »KANN(17)5 TANN(199) 
DATA I3TT £5054%(2%518418) SU, 1A6*GR, 10% 24,75"*9/ 
TwO=St 
Te@T4=6C 
NO 13 IT=1,65 
N&T=LTBIT(IT) 

I8T2=TITIoN3T 41 

IFCTST2..€.0) GO Td 20 

JNA TCIT) =L3vTXKC(I AF 2 NAT ZKNAT (TW)? 
GO. FE SS 

CONTINUE 

JOATCITI LBV TX(1 LOT 1, KM AT(TWO)) 
N2TS=NAT HL 3TL 

IPT 2=FRiMN3T#L 

TWO=TWI4L 
JDATCIIV=SHTFETCIJIATCTIID gNBTY ORL AYE K (CY BT2gN&T SKOATCIWD)) 
CONTINUE 

I@TI=T3T 2-1 

TFEC(I3T1.G6T.G) GI TI 16 

Te@T1=6C 

IWN=TWIDIL 

CONTINUE 

RETUPN 

ENTRY S24K8 

Tj=0 

RO Go Fleet tT 

00 4&2 JJ=195 

TJ=TI+1 

IF CTIeGT2103) GI TD UE 
TAT=55-9F JJ 

TANNG( TI) ZL BY TX CT GT, Sy KANN(IT)) 
CONTINUE 

RETU?N 

ENN 


APP=R- 2 = 50 
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SUBRIUTINE F$2°K2 (KCIATZIOAT,NTODY 
NIMENSTON KIAT(100) sINATOCNT) 
MID=? 

GO Tm 10 

ENTRY $232k 3 

MIO=3 

60 ¥3 29 

ENTRY S2?>K& 

MIOs% 

GO TY 10 

ENTRY S2?K5 

MyIN=5 

CONTINUE 

TIN=40/7"E9 

TT1=2 

AY 22 TIst Nin, ¥I) 

TI1=TI1¢2 

JJL=F 1 

JIZ=LI+ME V1 

NO 2 JSeLT, J 

JJL2IIJ1-0T1I9 

TFC TVATOCIIVCL TOL) THAT CSSI=FNATCIS) + 76°09 
KNATC IIAP =ISAYTX (S91, IID, KIATCII19 gL VAT (ISD) 
CONTINUE 

RETURN 

END 
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SUBROUTINE SEOLACTS) 


CRE REE R RE RARER RARE REY EER HMR SERRE EERE REE ERE PERE ER EERE EHH 


s@ 09 0902 0) 


AiG? Ca sei to <2 


42 


i9 


* 
* 
* 
* 
* 


1972 SIPBORIZ RAM. Fe HOLEMAN. LAST ALTE?ED 2 SFP 76, 
FOOM SU7RNITTINE GFIOG 16 JAN 76. 
a 
CALCULATFS SFOSENTRIS ANN GEOMAGNETES _ATTTUNE OND 
LONGITUDE AS A FUNSTICN OF TIme FOR A SAT™LLITE ORAIT 
DFSCRIBEN Sy T4E COORDINATES OMEGA,THES 41, 7I9TA, PR. 
seo 
eegere 
ALL PAPAMETERS BIT TI“F APE PASSED THRIIG4 FOMMON 
BLOCK TIGFO>. 
i eeERE 
i SRT PRL SMKMEHRSRER RAKE SERRE EERE SEER ERE EEE EEE EERE RE REE 


COMMON STIGEOS/S IGA, THE TR, OTOTH , & XLE gXLGgALTyXLF4_ XLGM 
DATA TSA.t 70 

ICALL=TCALLEL 

FFCICALL «Gla ft) SO FO 16 
PT=3.441592654 

NR=PY/i3). 

On=1./799 

TWOPT=2,* 7. 

PES2=270.*DH2 

PI2=30.*)R 

COL AV =11.4355* 9° 

WLON= 69, 76H1#DR 

STO=SIN(SCILAT) 

CTC=7OS(COLAT) 

CONTT NUE 

RIOTR=ERIITAF OR 

THE T2=TH=TAFNO 

OMEG? =CM=3AFDR 
OMFGTH=TT* (- 20041730 7462202) 

OME GTH=O4= STH* NR 
XLATI=ASTNISINOTHE TP) FSINCRT OTR)? 
ARGHSTINCTHETR) FTOS(RIOTR) JCSSC(CXLATRI 
IFCAPG.GEete) AXMG=ie-1E-16 

IF CAP2G LE m1) AXRG=-1.¢1.6£ $1: 
OMEGIB=AS INCA2G) 

IF CPT2.LT.TAETZAANTDATHETROLE.OL32) YYFSOI=9I-OMEGO} 
TF (H9T32.L Ts THETR.AND THE TRILL T.=PL2) OM EGOP=PT=-CMEGIA 
XLGO"*7==-399.75557*)? 

XLGR= OMEGQRFIMEGORETMEGTHE+ XLS OMZ 
XLT=YLAT2* 2) 

XLG=XLGRFEQJ 

IXLG=XL3 

MXLG= (CIXLG/369)® 36° 
XLG=XLG="-LOATIMKLS) 

IFOXLGeLT e390) KLGHALGZ4+360. 

AL T=9*1.35325-6371.2 


ae 


22 neh te nthe A ae iia 


2295°4M S29M~An OR/14/78 PAGE 53 


XLGR=XLG*V2 

CIG=SIN{IKLAT Q) 

STG=COS(KLAT RD 
CIN=CTOFST St STOFSTIFCOS(XLG24WLON) 
STD=SQRT(1 = CTHFSTY) 
XLTM=ATAN(STO/SSTD) #29 
CLN=CCTOF® (TI“CTSI/(STO*STO) 
SLGOLY=SINGCXLGPHAL ON) 
SLO=STSG*SLS.0/ST9 
XLOEM=1LAGe-ATAN2(CSLi2R, -CLO) FP} 
RF TUIN 

END 


P2 ISP AM S2SL AF C5/14/74 


PROG2AM S23, AF CTFILE,OFILE,LFILE=0,f FILF=64, 
+OUTPIT=6%, TAPEL=CETLE,TACFRANF ILE »TAPEZ=LFILS 
#+TAPEXZZVYETLE, TAP T5=3UTIUT) 

A ERK REE BERR RARER REE REE EERE BERS ERE ERE REE ER HERE HE. AHH 
~ReCee 


~ L197E  9ROGIAM. EE. 4ILEMAN, _AST ALTZ ZATION A JUL 75 
3 FROM OMALAF 30 NES 73. 
Deters 
Dt eee 
2°0GPAM TO ADD 9 AND L INFORRMATTCN Fo? MATA FILE FROM 


S20MA 
eee 


ee 
563693 °M SFAOVGE BEVITREN FOP LOADING. 
ye eeee 
Seas SRSEFEEEESEEE HERE EEL EERE EERE REEHE BREE ET EERE RL PENSE REEE 

QIMENSTON 2. 021) 532024) ySLE2L) gKVAT(C 277,18) , INK 1393, 
#FHED( SC), THE OC3S0).2T(1C), IRF C10) ,LTL 402), 509A (ESD, 
tLOAT( G8) yASPK(5),4TT( 2,16), B8ATT(2515),LABL (7), 
#XM03, 30,7413 53), 
+TANN(190) 

EQUIVALENTECFHED,7 459) 

RN=57.2937735128 

DR=1. 729 

BNEL=11.2¥* 92 

CNEL=COS(3D=L) 

SOFL=SIN(S39D=L) 

POEL=2920 © OR 

REWIND 

REWIND 

REWINDOS 

INTT=OAT= CAAT) 

TO=S-CONIITTT) 

CALL COESG(1976.,=L y BE SL) 

CALE SLITECS 

CONTINUS 

ILTS3=0 

IST4&= 9 

TLI=SECONI(ITTT) 

READ( 1) IWC, IGC, (© NEDCT), I=15 IWC) 

IFCEQF(1)) 110,50 

CONTINUE 

MNEMO=CHEID(I WC) 

FHENC IWC) =SL.OFIL= 

FNCOVE(33,4901,L43_) CTHENCE), Tat, ty THEDVCA)D 
FOOMAT (R425 92K A105 1X y AR) 
GMT1=FLOAT(IHED(13))71000. 

TRAT=FLOAT CLHEN(19)) SFLOAT(F HEN(20)) 71°09. 

GMT Z=GMTL MFI OATCIH20017)) FTAAT 

FHE(21)296. 258 

XINTASFHED (24) 


P2574 


M S27 AF CH/14778 


WRIT (3) [Wy 1G%, (= HENCT) gI=1, 0W3) 
JO=TIE9( 745) 

CALL TOATI(LTIMs TYyMOINGFHEDN(CA7 Ds IV,L 199 
CONT® NUE 


" 2° AN MASTER FRAME YTNPUT 


oS aed 


135 


meee 


REANCL) YA, 150, (CKOAT OT, J), T= 1, TNS)» d=1, 750) 
IEQF=EOF(1) 

IFCYIS OF eNE&.9) GI TH 1098 

TSA=¢ 

TSB=f 

TSC=? 

JGC=IGC-1 

CALL S2HKI(KCOATC 1,1) sSDAT KX TAT (1) JG7) y PANN) 
ON 130 If=1,6 

TSA=TSAtLANN(TT) 

CONTINUE 

NO 240 IT=7,15 

TSB=TSI*LTANN(TYT) 

CONTE NUE 

90 250 IL=17, 36 

TSC=ISC+IANNUIT) 

CONTYTNUE 


TFC (TSASLT.SO0¢AND-ISS LT 1150) 24ND, ISC oLT.2C00€) 


CONTINUE 
IFCKYATCIWS, IGC) VE Se LCHATT PFCORD) 39 ON 10 
ICTI=ICVS et 

CALL SAU235 (COAT CL, TGC) -IN Ast 3} 
ALY=TOACL) 
XLT=-LOAT(IVA(2))7iCC. 
XLG=FLOAT(ISA03))7109~ 

THE T=FLOAT(I9DA(G)) 7100. 
IFCXLT.GF.99.) XLY=xXLT-360. 
OMEG=FLOAT(IOA (5997100. 
XLTM=FLOAT(TOA(5ID 7100. 
XLGM=FLO4T(I94(39))710C. 

TFC XLTM GT e900) XLEMEXLTM 240, 
RKM=ASLT#5371,.2 

PNM=2K4/1,85 325 

CALL LWVAICKLT, XLS, ALT, oC COL, BAyFLy 32y4T, AP) 
CALL. ENTERCE LL, SL 2PeUs lee ts TEX) 
CALL INTER Coby BE ghd gUglyFL yg PF X) 
HMN=(8A-35X) SLY 

IFCHMNeLE. Co) HYNEZ. 
IFCHMN.SGTLALT) 4MN=ALT 

INACL PHEBAF LOOT Oe +05 

TE CFL eL Ted ee Ie LeoETel Qed FLZ=106 
IDA (7 dEF.LF100004.5 

INA (7) =H4Nt.5 


80 


PAGE 


G) TO 10 


55 


P2959AM S2aLaF OR/146/75 ORG: 56 
. APM GEOMETRY . 44 
Te eee $13 
TI2=6 1146 
TIL=1G3 =? 115 
HO 8. FIsL, tL 116 
Oo. se J=2,2 1437 
TI2=Tl2+t 128 
( ATT(JU IT) == COAT CEVACIISI ICL GO. 1195 
cor CONTINUE 126 
+20 CONTINYE 424 
SGAM= COSTX TIO T4A* ORE ZCOS( XE Te dR) 5 ede 
TGAM= A3SCTSGAM) 123 
LF'CTSAM cE sted SO TO P40 12% 
. WRIT® (852005) IST3, XIOTA, XLI p2s 
| 2006 FORMAT{1X,* AT PRPVALEM AT* TS, 2F10 et 126 
! GO FT 10 Beg 
140 CONTINUE 128 
GAM=ASIN( S344) #20 129 
LTEOTAET 0ST 3 De ce ANVETHET eLY.2 702.) GA4=290.=6A™ LSC 
7 N@=ATAN2 (29, aT) *P) 14 
XIB=ASINO3SIS3A) FA) 1's? 
RT(1) =-(90-.+G4Mt43) ye 
ERE CESS 1%] 
Ri Ceysse .#xi s Be 
ERT (2) =1 1 36 
CALL FULZRITHA, PHA g¥M, RT, [PF 2,0, THA, PRB, XM) 737 
CALL EULTR 90. Deg XMyRTyI PT, Cy 1, 4NGT,A'GO,Y™) {3A 
IF CANGT «LT ede} ANSTSANGU4 SEC. 13% 
IFC ANGPe-Tedeo)d) ANS P=ANGP4+SAD,. 14r 
IOA (4) =100.° ANGT 4.3 141 
INA (=) =193 -# ANGO4#, ST 14? 
PACE .a0s , 4&3 
DO 465 Fists i bt 144 
PHA=ATT(1,IC) 1465 
FHAH=3E e#A TTC 2,11) 14h 
CALL EULER CT HA, PH8 4g X MART, IPT oO ote BATT (2 TT) gFATT(C2,TT) YM) 
%C CONTINUE 148 
T1i2=5 149 
OO 1590 PiSity TEAL 1598 
0 140 JJ=1s 2 254 
TT2=1i2¢+ 1 15? 
TF ERUTT CISTI el Tete) BAT Ti Sdy LIP SSA TICs, TT) +360 « A a 
TOA CTIZ)=102 -# BATT (Sd g ITT) 405 154 
169 CONTINUE 155 
CALL S2PK3(CNAT(1%,I35C) pI DA, 39) 15€ 
KYATL INC ys IS55)=12449G 2FNOEN 187 
} pis eeue {Sa 
H 5 WITTE MASTER FRAME OUTPUT 450 
ne eee 16¢ 
WRITEC3) IWS, IGT CC KNATCT J) g Lely IW) ps1, TGC) 1A1 
ICTG: ICT 4+ 1A2 


81 


P2752 AM S22LaF SASAG/TS PAG? 57 


TF OIS Ack To S06. AND. TSBET. 11502 GO FD 45 163 
TFOMANCIITS, 4) eNEet) SO TO 16 164% 

HR= (GMTIZEFLOAT(<KOAT (6 1,1)) *TOAT) S340). 165 

CALL TOATIIL TIM, TY, MONS HR oJ%, 019) 146 

"O}4 FORMAT(24154X%,*S3-2 64 SECOND LISTINGS 529M MAGHNETISE 167 
t® FIELD SPFIZRAMAFFEXZFFPHEMZ RUS FOR Fy T1 Deu piXgh1 De 7X, 168 

#* COMPYTER QZUN OF F,A1E 149 
#/5X,°RT ASGENSTON = *,F10.3,% INCLINATION = ©,F19. 3) 17e 
TFCITYSCEVeL) WOIT= (552001) H2gMON,4IATZIMEG, XIOTA {74 
IFCIVTS -EQe1L} WRIT? 69,2043) LABL 17? 

2917 FORMAT(SX,®IRAIT TT) = *,3A1C/T26,*S529C“NFRIC*, 17% 
+T6C ®GEIMAGNETIS EC IOK, FTIME® pT 209 *LAT Se T30y FLONGS, 125, 176% 

t¥ AL TY, Ta3, *THETA*, F554, *LA IMF y TEB, FLINME gT77g*R(KM) Fy 175 
+789 ,#3¥,T99,*L¥,TiS7y* HMI NY) 176 
WRIT] (9, 201%) LTIM (3) gL TIMES) gLTIMOS) pXLTgXLGq ALT gf HET, ‘77 
#XLTMy XLS, 0CO%~ 94 9 HL AMN 178 
SEL EAR MATCIK,E2, OF te > =e Sef 10 5 Sak Fe ky SEE De FoF 100 te FiO. Ss 179 
#Fi0.4,F19.1) 1AG 

GO ¥O 16 184 

:uf CONTINUE 182 
WRETS C8, 2002) ES13, TOTS 1°93 

2739? FORMAT(1xX,I5,*% WASTER FRAM=S READ 720% SFILE*S/ 184 
+1i%,TS5,* MASTER FIAMES WEITTEN ON DETL=*) 185 
T2=S=CONV(TTT) -T1 126 
WRIT’ €8,2693) T2 {57 

7G9% FORMAT( 2%, *22CCZSSINS TIME =OR ORRIT T5*,F1C. 3) 188 
ENO FILES {2G 

69 TT? 54 196 

113 CONTINUE 494 
T2=S°CONV(TET) -T2 19? 
WPIT’{8,2005) 1? 193 

*O6° FORMAT (2¢,*TOTAL F2ZNCESSING TIME FO2 SPALA IS*,F1C, 3) 144 
FNO 1395 


APPst- 3 = 57 


82 


PO NGEAM S2s5LAFr CA/14/73 


SUBPENUTINE ZFULER(TA, PAX, ALP, IA yNA,I NI, THgPHY) 
OIMENSTON 4€63353€7) eX C3 eS o¥ C3 e380 4M. 20250) , LALO 
PT=3.141592653 

RO=1°C./7T 

DR=1./29 

IFCIND.N©S.0) GO TD 16 

DO. 22 EL=1;,3 

S633 Js2,5 

X (II, Ju) =3. 

CONTINUE 

X(II,II)=1. 

CONTUNUVE 

CONTINUE 

IFCINO.E?Y.3) GO 12 
TAR=TA¥)2 

PAR=PA¥DQ2 

CONTINUE 

HO 67 IT=i,3 

NO GO JJ=1,3 

VCE Ys Sd) =K CEL. SH 

CONTINUE 

LECNA LYLE GO FO 30 

NO 6¢ Ifz1,NA 

CALL TRANS (ALPCT TD, TACIT) ,Y) 
CONTINUE 

CONTINUES 

ITF CIND.E1.&) GO T3 116 
&A(1)=STNCTAR) FOSS CF AR) 
A(2)=SIN( TAZ) *FSLEN( FAR) 
AC3)=COSCTA2) 

IFCINO.EV.2) GO TD 70 

DO 8. I[L=1,5 

EC ITD =5 

NO 86 JJ=1,3 
BECITISe(CIIVeAC IJ FY CIS, IT) 
CONTINUE 

GO T? 39 

CONTENUE 

NO 136 EY225 3 

B(IT=35. 

90 100 JJe%, 5 
S(ITIVASCII+VCII, JI) FACS) 
CONTT NUE 

CONTINUE 

TH=ATOS(3C 7) FRI 

DPA=AT ANZ (39(2) ROL) I FOND 
CONTINUE 

RETUPN 

END 


ry NY VN ND ID TO 
NIV +e bh F* be pe Pe 


™m 


-mOO PND VMS 


P2O0GFAM S25LAF CA/14/78 


SUBPCUTINE TRANS (P4T hy X) 
DIMENSION X( 353) y27T(2y 2) VC 3y 3) 
OPT=3,. 1413392552 
QN=150./7I 

dR=1. 7RN 

DO 18 If=1,3 

90 12 Jstte3 
ROTITI, IID =RHD. 
ZSONTTNUE 

PHT R= -=PHT® 32 

GO TC (20536,49) - 
CONTINUE 

SOT (Ll) tLe 

ROT (252)=595 (PHT?) 
ROT (?,30=SIN (PHT) 
RCT (3,20 =-2IT 253) 
ROT (3,3) =20T (2,52) 
GO T7 50 

POT L920 =5 95 CPO NTS 
POT (ty 3) =-SIN(PHT2) 
ROT (2,2) =123 

ROT (eid =-2IT Cty 3) 
ONT (%, 3d =H2TF (1,1) 
GO 3 59 

CONTYTNUE 

ROT (1,1)=5°S (PHT?) 
QNT (1,2) =SINCPHT?) 
ROT (7,1) =-2IT(1, 2) 
QOT (292) =297 C11) 
ROT (2, 3)=46 
CONTINUE 

NO 61 TI23,3 

00 6° JJdJ=1,3 

YCII, JJ =5 . 

NO €) KK=1,3 

YCIT, JID=VCT Ty ddd OY CTI KK) SPOT (KK, Sd) 
CONTINUE 

NO 76 ELALs5 

OO #5 JS2155 

X(LI, JJD=VCIT, JS) 
CONTTNUE 

RETURN 

ENO 


APPep- 3 = 59 


27 IG2AM S2SLAF C6H/14778 


SUBROUTINE TNVARC FLAT, FLONG,ALT,ZFRO, 1B, F_ 4 22,87, BPI 
REVISED YES 1945 
NOTF,ERQI2A IN L TS TYPICALLY LESS fF 4AN 120.%FRRFL (PERCENT) 
FLAT=LATITUD= TN DEGREES 4, FLONS=LONSTTUNE IN JIESREES 
ALT=ALTITINE=JVISTANCE FROM SURF AC? OF =ARTH IN KTLOMFTE OS 
NIMENSION V¢ 353) 530200) pARC (250) VNU 7) VOCS), BEG C 20S) gEENND (AIO), 
13L0G6(200),F59(22G6) .9103),R203) ,97%(3) 
CALL SLITET( 1,T°G1) 
PAN=HS7.2957795131 
TF CIFG1.E9.1) GO TS 50 
VeELSe@RSALT s/S S714 2 
VC252) =C IC ee FLATIS PAD 
V (252) =FLINSSPAD 
APC (L)=90. 
ARC C2) =C1.0¢V(1,2)) *SORT CE2R) *O.3 
NCL T=1L1.5708-0.2007°COS (V3, 2) #1. 233) 
TF EVE2,;2)-O5L 1) £6,20,22 
ARC (7) =-A25(2) 
CALL START (R1,22,27%,8,ARC, Vv) 
BO 22? fetes 
VP(TY=V(T, 2) 
VNC IT) HVT, 3) 
CALL LINZS (21522977 pRB yARCy= RA_eSg Vy INI 
TF Cd='266) £6517 62 7 
Floelec 
GO FF 18 
JUP= J 
O01 46 J=t, JJ? 
ARC (IV =A3S CARCI)? 
RLOG( J) =AL05 (3809)) 
JESHJUP WL 
00 2: J=2, 52°? 
ASUM= AQC( J) © ARC( It) 
QX=0O0L05¢d-1) - 39609) 
DN=ASUMFARC( J) FO25 OS 41) 
3C9 =((3LI9G6 (5-1) -8LOG (S41) SAPS CD) F#2=-DXFASUME* 2) FIN 
cco =(9KX*®42C( 541) —CBLOG (J) -8L06 (Jt td) ARDS) )70N 
SA=.75¥ A250 (5) 
SC=Sh8+.25*ASUM 
NCO=3L90G (J-1) -CC9 ®SAFSC 
ECO (J) =859 «C30 *(SAt*SC) 
PEG CIV=HEKF® (NCIOFEL IC IPS 5 FAIPC CID) 
EFNOC J SEX® (ICOFTTO( I) Fe S* CA SUMF+AR’ (CI) DD 
BEG (IUPP=3EVOC JED 
RENN (JUS) =3( JUP) 
FCO (9U9) =062. 0/825 (JUS) DFALONG CBENV(IIFDZ FEGCIUP)) 
CALL INT=S CARC, E35, BEND, B, JES gFT0,° INT) 
GALL CARYEL CSC2)e °C INTeF UL) 
BP=B6( 2) 
RONTINUS 
RLZEALT/537416 2416 


w942 89 09 


iN AA AANA OW 
we FP OM aC €s a > € » 
AYPDBAnNDN FwWNe Oe 


hs 


61 


PYOGRAM SA@SLar CO/14/78 PAG: 


THE T= (90,.-7_ AT) £241 
ST=ARS(STNGTHET)) 

PHI== LONG 4240 

CALL NEWMOG(9L,ST, HE ,AR,AT, IP y OS, TAT) 
IF(T=GieEVeL) CALL LCALLCFLAT,FLONG, IL T_=L) 
IF(FL2GT.93900.) SL=-t.5 

&S= SIRT (ARFBREAT# ATS 3P¥ BP) 

PETUPN 

END 


APP-3- 3 - 


que Qeeere 2s 


POOSPAM S2°t AF 


SUBRIUTINE LCALLOXLT,XLGy XAT, XL) 


DIMENSION UIXL (145) 5) UDXL E145) ,NUKL (165) gy INX¥L (145) ,TINIX(144), 


#XLARi2) 


COMMON/SINTD2P/K1 ofS p21 4X2 9V? gZ2yM1 9972749 7 Fy NG oti1L ye V2—9I3,US 


NATA ICALLZI/ 

IF CAIS(X_T)eGTe8&72e°) XL=E6655. 
IF CASS (X_T)0GT.9705) RETURN 
ICALL=ICALLE4 

IFCIGALL.NE21) 39 10 10 

CALL OPENYS( 2yITNDK, 146,60) 
SALL REAIMS(24XLN9, 24143) 
71=X_ a2) 


72=X.A3(1) 
GO 3 26 
19 CONTINUE 
TEST= CXL T=ONLT) FCXL T-UPLT) 
TF CTEST.GFsGe)} GO TO 26 
20 CONTINUE 
ye vere 


~ 
4 


DETERMINE LONGITUDE INOEX 


eee ee 


26 


KLGL=XLG/2.5¢+1.6 
KLGU=KLS_+1. 
ONLG=2.5*FLOAT (KLS5_=1) 
UPLG=INL3+2.5 

TES T= CXLG-INLG) FE CKLG-YPLG) 
IFCTESYsSF 0} GI TY 106 

IF (KL GU2GT 2145) KL U=145 
X1=DNLG 

X2=U9LS 

ULFUIXL (CL >.) 
U2Z=U9XL(SLSI) 
US=UIXLIKLSI) 
US=UUXLAKLSL) 

D1=OIXL (KLS_) 
D2=N9XL(<LSI) 
NS=OUKLECKLSI) 
NG=NUXK_. (KL 5.) 

CALL INTRICKLGyXLT, XALT,XL) 
DETUIN 

CONTINUE 


Bb be clinic 


a 
~ 


NEW LATUTUDES VEED=9 


nyeere 


IND=CXLTH#R 7.5L o2 He 

IF CMONCING, 2) 269-03 IND=ENN-1 
ONL T=FLOATCINO=$19 * 1 225-87 0S 
Y1=NNLT 

CALL RERIOMS(2,UdX. 2145,IND) 
IND=ENOL 

CALL REAIMS( 24503KL.145,TN) 


APP-B- 3 


87 


04/14/73 


PAGF 


4a 


ten 
764 
75? 
7ER 
754 
755 
755 
357 
258 
359 
7A0 
764 
™H? 
253 
He 
345 
25h 
267 
348 
264 
274 

274 
272 
373 
27h 
375 
376 
277 
272A 

x79 
7RQ 

7aq 

792 


62 


63 


PI9GPAM S2°car C6/14/74 PAGS 


IND=tND+L 
UPLT=FLOAT(CIN=1)*1625°87065 
Y2=UPLT 
CALL REAIMS( 2,UIX_ 9145 gINN) 
IND=TNN¢1 
CALL REAIMS(2,95K_,145,IN0) 
TEST= (XL T-~INLT) ® (XL T-UPLT) 
EFCTESIsL Ged} GO 13 36 

Te ee 

> PROBLEMS IN LATITUDE LOSIC 

Te eeEe 
WETT= (652901) ONLT,XLT,UPLT, IND 

703i FOQRMAT(1%,* CHECK _ATITUNES®, 3F 10.14, 5) 

GO TF £45 
CONTY NUE 


FPOBLEMS IN LONGITUDE LOGIC 


WRIT? (652002) INL3,XLGyUPLLy KLGLyKL3J 
FORMAT(1X,*SHECK LINSI TUDES y3Fi0. 4, ATS) 
CONTINUE 

CALL EXTS 

END 


APP-R- 3 - 53 


22969 AM S29LAF GS/14778% PAG= 


SUBPIUTINE INTRI(72,92,%3 gf?) 
COMMON/INTERP/X1 V1 571 yK29V2 9 Z2y 197725135 Mh g UL U2, UT, US 
TE CUS oh Ted ee Ie J Zet Vee eNReIZTeLV¥eGee WUE LT. 06) 69 TO 26 
TE COS oh Ted ecOReN2eL Tee eOR. VILT. He. XR. D4 LT.0 6) GO TO 10 
PA=0. 

FF€21.EQ. 72) GO TO 20 

Ph= (93-71) /( 72-71) 

CONTINUE 

A1=Di¢+(UL-91) ¥Q2A 

A2=02+ (2-92) F984 

A3=034+(U3=93) *RA 

AG=0%+4+(U4=34) FQA 

RR=0. 

IFC(V2.E’-Yi) GO TO 30 

RB= (%2-V¥1L)/(0V2-y1) 

CONTINUE 

Pi=A14(AS-AL) FRI 

P2= AP + ( AFHAP) FRI 

RC=C. 

IF (X20E&%-Xi) GO TD 4G 

RC= ( 1-KX1L) 702-1) 

CONTT NUE 

FP=B14#(32-31)*FRS 

GO T) 5S 

CONTINUE 

FP=8886. 

CONTINUE 

RPFTUPIN 

ENO 


B2769AM SZ2ILAF OA/14/78 PAG: 


SUBPIUTINE POSTL (IME, XLT pUBLT MALT? 
NOMELTST/NAMLZ THE4, HHH MLAT, XMLAT 
NAMELIST/UNAM/XLAT, ALT, OLNG 
RFWINND2 

RFWIND? 

PEANT2,NAML)I 

UAL T= HHA 

DEANS 3,NAML) 

OAL T- HHH 

TFC JHEMZED.1) GI TD 10 

REAN. 2,NAML) 

UAL T~ HH 

REANZ,NAML) 

NALT HHA 

CONT' NUE 

IF CA S(XL TD eSTOCUXMLATH=.1)) 2ETURN 
TLAT: 2.001*ILAT 

CONTTNUE 

REAN« 2yLNAM) 

PFAN( 3,LNA™) 

IFCA SEXLT-XLAT) .LT.TLATI GI TO 30 
60 FY 20 

CONTTNUE 

PQIN' 20) 1,XLT,XLAT, MEM, UAL T, DALT 

2>SC1 FORM. Ti 2K, "NEW JUANPANT CALLEL. LAT=*,FB.2y* DATA SET=%, 

#29, 272K yg F4E4TSOHER =*, TG, 2F5 0. 1) 
PETUON 

END 


P*IGPAM S2>LAF CES14/75 PAGE 66 
| 
SUBRIUTINGE LINES (F149 %2o% 3929 ARE L,I. VP g VN) 479 
e VERSTON JF MAY 14365 KAN 
NIMENSTOW 30200) yA 2C 6200) gPl C3) 92263) 4 2303) gVNE3) ,VPCT), OAT) 
CRE=(.25 42? 
IF (F22=0.15525) 74, 75,75 48? 
7% CRE= ( ERV#*G, 233333333) 4AL 
75 A3=A20(3) GRE 
AAR=AES (43) 4 36 
SNAZ=A3/013 427 
AL=A2C(1) LAR 
A2=A?2Ci2) 4329 
ADG=43"A 376.0 & 29 
i ao way 
; ILP=? 4&3? 
j rs=4 443 
i GO T) 87 426 
6& IS=1 495 
q J= det Kak 
3 ANG=A3*FAT/6.0 427 
ARCJ=AL+4 2483 4 QR 
AD=(ASUM*E4S4) SAA 439 
BON=ASUM/35 393 
CN=AL/C5 a | 
36 00 5 T=152 cn? 
DD=HRE CTIFANM=QACTIF AIHEVBCT ISSO 593 
GO 1)(653),IS 594 
B® &TERE CTD -CAVFQLCT) ~ SDF OAC TIECOFOT CL) -NVEOQKY) FARC YS 575 
RACI)=R21T) 546 
R101) =22¢T) 547 
RZ(TV=23(D) 578 
R3( 1) =QT 5a 
i VP CT) =vNCT) E4q¢ 
AR PAAR=(22ACTIFARCTIIS 20-90" AOS Et4 
= VWN(T)=VP(T) #A3#® 2942 512 
97 ITF(VN(2)) 76,77 577 513 
7% VNG2)=-VN C2) 514 
77 ITF CVWNO2) = 36141592453) 7847 B79 S45 
7S VNC 2)25.253L85307-YN(2) 516 
GO Ti 77 517 
7% TECVN(3)) 80581591 S18 
3D VNC ZDEVNO 32+ 6.2231 °5 307 51s 
60: T? 7% 5 6 
81 TF (IN( 3) -66 2823185757) 82, 825 83 5 24 
RS VNC 3) HVN(639-6.28 3425307 622 
GO T) B14 Bz 
j 82 GO T) (3y16,TS 5% 
Q SIT=ARS (SIN (VN (720)) 525 
POEL= VN(1) 56 
POE 2=ODE LF YN (2) 5°7 
PRE Z=PREL *STTEVN(3) 58 
TEeEe SSOXSITESTT 5 7q 


91 


>293°AM S23L4F oF ibs 78 PAG: 67 


TEREE OF Q=( 6359. 9L24STIE (210 56774. 10BESSVUI/5 371.2 530 

STORe AC O=VN( 41-959 534 

TPES CALL MAGWETCAE Ry, SIT, VN(3) £29 BT,3P% 53015) UNO 2)) 5.32 

CALL NEWMAGLIVN 4 STTyVNO(3) SP yBT,9P,3( 5) gVNE2)) 533 

293(1)=8R2/320)) 534 

NN=BCO JS) FIN CL) 525 

Q3(2)=RILIN 536 

P32) =5P/(0NESTT) S37 

ASUM= A344? EIR 

AA=ASUMEA? 5% 

j RA= AZ*A? SKC 

; Ch=ASUMEA3 Sut 

ISz2 542 

60. FY 3h 543 

1° CONTINUE C44 

| SITT=8K8S (SIN (VNO629)) 545 

; BCJV=BCIVF (CC 2PSEL/ V9 CLD DF 3) 546 

SQ ART=L5#FAIS (ATL CLHABS CP3C2V¥FVNGI1)D) 547 
X= (ABS CVN(L) =P 2EL) COR TEARS CVNOL) EIN OT) MPREZ) EARS CVN CL) ESITY NG 3 

LP =PPT ZV CAABFERAAESOOT (1 .4GRT#QRQT)! 549 

GO TY (90,393,990) ,IL 550 

9? IF (X-3. 3) 90,89,89 554 

| BC AZEATS, 275 (3 oC X15 BEX) 552 

q J=J-1 55% 

TLPes 554 

ASUM=A2444 555 

AA=ASUMELL 556 

} BAS AP AY 5S7 

CC=ASUMFAL2 55a 

HO WH T=t,3 359 

VNC ID =V2(T) 560 

RSET! =R207) S61 

R2¢1: =R1(T) 56? 

34 RLS HAT) 562 

60°%. 73 5kG 

ql 36 TFC S- 2001 57,69555 565 

57? AiLz=A 566 

IF CR J)=30209049,47.40 347 

4: ILP= 568 

A2=A° 569 

AZ=A ¥,2°( 8, XI (3 4X) 570 

AM= (> 6-23 (2) ® VNC 10) FVN(4) FCPE E71 

f IFCA.S (A3)- AM) B4y-Gy7? 572 

72 ASHES ARAM 573 

J 8% TE CSIARQ 301) 4.5) 35585572 57h 

QE AM==.5¥*SVNEVNG19 77701) 575 

TFE(A S$ (43)-AM) 72,577, 56 > 76 

} 9+ AZ=ES'AFAY 577 

77 APO (teiy= a3 578 

f AA%="H5 (43) 57g 

; GO T 56 58D 


AOP=A- 3 = 67 
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54 RETURN 
FNO 
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SUBRIUTIVE START (21,R2,R3,7y ARC, V3 
VESSTON IF IEC 194° 

DIMENSION 3(0 200) 54200200) ,V(3,2),2141( 2), P2(7),R3(3) 
SIVHRRS CSIN CV C25 7732 

AER=V(1,?) 

SSQ=STEPESTT 
DER=(6353-9L 24550" ( 24,367 74.165 8*SSO 17537122 
OFP=1. 

VEL ,2) =AFRHDER 

TF OVtS. 2) Levies te 
60 TT) £06 

CALL MAGNETCAER, ST TV 0392) 982 BT, BP, 307) V0 25 2)) 
CALL NENFAGOV (192) oe STT VC 357) 4 BPA8T, RPy BC 2) VC 2,2)) 
R2¢1) =6RI3(2) 
ON=B( 2) ¥ Vv Cl, 2) 
R202) =BT7 IN 
R2(39=397 (ON*SET) 

IS=9 

CO 2? T=1,3 

VAT LI HV(T 92) ARSC 7) FR2CT) 

SLY¥=8S9S (SIN (VCee2004 

SSQ=S2T* SEF 
OEP ={6355.91 24550" { 24. J67 7+. 108F SSO) A371? 
AFR=49 (1,1) -2E°? 

CALL MAGNE TCAER, STT,V03 9105977, BT, BP, 302) ,V02,1)) 
CONTINUE 

CALL NEMMAG CU C1 ot d ps SLT 9 V (3554) 9B, AF 5 B%,361) yp VK2, 19) 
IF (C601) -8(2)) 49595 

AQC( 2) =-425 (2) 
Barts: 4 
R144) =RRIA(L) 
ROC C2) zA25 (2) 
NON=BC 1) *¥V C4, 1) 
RPi(2)=B8T/9IN 

R41 ¢ 23 =39/ (HONESTY) 
00 6 FSkhwd 
VOT LV AVIT 2) -APC (FE CRACTI FRAT) 7/2. 

STT=6HS (SIN (¥025)12))) 

TS=1S 41 
GO TF (3y7)y FS 

O00 ® f=t,.3 
VEIT gs SVEVIT 22 FART CRDECOLeESIERACTI— SFR CTD) 
SF TUIN 
FNOD 
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P2ISIAM S23LAFr 06714773 PAG: 
| SUBRIUTINE [NTES (CARC,BEG yB=ND 58, JE2,E TO, FI) 528 
c UNCHANGEY MAY 1955 < 99 
MIMENSTOY ARC (205), 3EGC2CC),RFENNC201), > (209) ,FC0( 209) 53E 
& KK=eyte Az 
TF (K€-4) 14511, 20 432 


1% KK=K<=1 5 
14 A=B(KK-1)7302) F 
X2=Q(KK)/ 27) 575 
; X3=8( KK#1) 43 (2) E 


ASUM=ARC (KK) 40RD (<< #1) oF 
N= ARC (KC) FARE (KR KEL) FA SUM 5 3A 
RE= (-A* AIT (KK EL) CAREC KK) 4ASUM 4K 2¥4 SUM¥FE 22 X FARE (KK) FF) SON 
C=C AF AQCTK KEL) -XK2FAS IMEX FAP (KKD) SIN 54S 
FI=1.570795326¥% (1. -AtBAFAGB/(G.*CVIZSIRT CABS (C)) Su] 
OOCTLION 442 
2o T=SORT (1.<3 END 2) 7842)) E43 
ZET= (Let TH (1e-F) sas 
TF C7EY cbOs0%) 33 FO 26:0 AUS 
PT=( 20" F-ALISECLSt tl) FAT) 7 ECC) 546 
20% TFCBC2)=BENDUKKP P22 5 21425 S47 
201 FIH1600."* 1008 54R 
GO ¥2) cut 449 
300 FI=1000.¥*1609 59 
GO TS 30% e234 
2° KK=KC4+4 tees 
et T=SOPT CATS CP. CSRS GCCKKP/ECAy? ) 653 


a 
+ 


ZEV= C2etlil Clee Ft 

EE CZEY 2.692 0e) sh TO Stt 

FISBE=t2e* TACOS C02 6 4E D7 Cie 7) FIC ECIARKD 
30% KK=Ke1 
ee OOS T=seikk 

ARG L=1.-3END (T7207) 


An JS 
TN 


ns 
a 


wow wn VP vi 
nr yy 
er £ ~N 


IF (A761) 25526577 
26 TE=1.6-5 AGt 
GO T) 28 FG? 
27 TE=SURT (A834) 563 
2% ARG1=1.-35G6(T) 7302) EG 
IF (A9G1) 29,29, 231 565 
34 TRESART (4251) 556 
69 re? Se -O7 
29 Te=1.€-5 AER 
32 TECAIS (259(TI)=205=5) 23423, 24 569 
PF FIZFTH( (TESS) FCART(T) FARC(T HELI) 74, tas 
GO 115 574 
2% CONTINUE 27? 
TET Z= (Let TEDL eH TAPS CCL oH TED HCL tr aD) &73 
IF (ZET3sE2s Oot “T= 105**37 7% 
LE (PETS oNSe OF) HTHF THC Pe# (TERT 3D- AL IGCZ= TBD ECIT) AS 
S CONTINUE é7¢ 
30 PETUPN <7? 
END re 


| 
tl 
i 
} 
} 
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UNCLASSIFIED AFGL=-TR=78-0181 NL 


2r3 
la 


ee 


= ule |Z 
act euz [ize 
e is 
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Eee 


NATIONAL BUREAU OF STANDARDS 
MICROCOPY RESOLUTION TEST’ CHART 
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ry ci cae a Wel Ae tn tak, a i tc 


D2OGFAM S2°LAF C614/73 PAG= 


SUBRIUTINE TASMEL CAyXT,VL) 
PTIBE TC CARME 
ie UNCHANGE) MAY 1365 
° COMPUTE - 

TF OXT<$1.0E-36) 14514515 

VLE (3-511 5537394402 2/3.) 

RETU2N 

XX= 3.0 ALIG(XT) 

XX=XKX+ALI9G6 63 /0.711653) 

IF (X¥ +22.) 151,58 

TF (XX4+30) 25259 

TF (XK =3.)3593,10 

IF (XX -11. 744511 

IF (XX =23.) 5,6 

GG=.S533339*KX+.706942102 

GU T) ? 

GG= (CCC OCB LS S77 ISEM1G EX +8 072525 215-13) ¥KX4+1.0) 66362 E-9) & XKt 
TB.1C4BO6SEW3) *XX+3. 291 635 4F-6) FXX#8, 27210 96F $5) *XXt1., 371 46E7E = 3)D* 
OXXF ol 15017245) XXt. 3432642) * XX+.A23 77691 597 

GO T) 7 3598 

7 6G (OCC C0002 660470 25E-10¥ XX+ 2.302875 7E-9) F¥K— 26199798 3E-B)F XK- 
15. 39776G25-7) FKX-3, S60882 ZE-6) FXKX43, BI79ILTE-S)¥KXXHL. 17942345 = 3%) * 
EXX+ Le G4IZ44LE-2) ¥XX 464335278 Bd EXXH 69 22BEGU 701 

GO T2 7 702 

& 6O=COCOCOC(S « 227165 5E= 10¥ X¥= 3.958305 =- 8D XX 490976614 BE-07) FKK = 
11.25319325-5) *XX#7, 945131 SE-5) FXX=3, 276770 S2F 4) HXX#2. 1686 39R=-3)* 
2XX+162817955E-2) *X% 4.4355 G579) FXX465 222355 79s 

GO 1) 7 706 

“ 6G €00002.32120952-B XX 3.85 49 27HE M9) EXXH2.170Z2GF- 4) FXK 667311339 
LE=3)* XX#.120 59224)  XX—-. 18461 79ED*XX+ 2.50071 87 708 

GO T7 7 7¢9 

5 bG=X*-3,0460661 716 

7 = CANTINY= 712i 

IF (5G6.GE.83.0) 35 = 88.0 712 

VLECCCLeIFEX® (GING. 311€5 30738 FECL 273.) 713 

RETURN 714 

FN 715 
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yeees 


a? 


SUBRIUTTINE WEWMAS(C 2ST sPHT, BR 98793? 934 THET) 
DIMENSTON G6(9,9),34(9) 

COMMON/ 8.951 /7G_ BM, dg NMAX, SUM 

IFC(SUM) 1000,1905,1000 

P22 = GO. 

RELATIVE ERZOR IN 2 

BERR=0.0001 

AR = 0. 

OO 1661 L=1i, NMAX 

NO 1001 M=1t, NMAX 

AR = AR + te 

P22 = 922? + APFGIM,L) 

SUM= (SUM=9222) /SIM 

IFC ABS (SIM) = 12F=G) 100%, 1004%,1392 
NOTE FOLLIWING 22RINT ANDO STOP STATEA=INTS 
PRINT 1333,S5UM 

FORMAT(214 JATA WRONS IN NEAMAG =15, 3) 
STOP 

SUM=°. 

P22=ST 

P21=SART (1. -P22%72Z22) 

AR=R 

IF (TAETH1.576796%27) 154,154,156 
P21==P21 

IFCU) 152,152,151 

S$SQ=922*2722 

AR= A%#(14,.258-SS 9 (21. 36774.15 8FSSY 7537122 
ARP=1./A2 

N=; 2 

OP2a=P21 

SP2=SIN (?HT) 

CP2=COS (PHT) 

OP 21==922 

ANR=AR¥FAPFAR 

C2=GC 2,2) S224G (1,2) "SP2 
BR=—(AOQ#A ORD * (662, 1)¥P214024920) 
BT=AIR® (5(2,1)*99214C2*0P 22) 

BP=AIR*¥ (GC 1, 20*5P2-G(2,2) ¥S22) #P22 

IF CNMAX=3) 1533 

ANR=AD FAQ 

ERR=JERQFSIAT (06727922) FF 242 RFF 2eBTee 2) 
IF (38803) FAJFPHERR) 191,13 
SPZ=(SP2#592) *C 22 

CPZ=( CP 24592) *(782-SP2) 

P31=9 21*221-0. 333373333 

P32=P921*722 

P33=222%222 

NP31==-9 32-932 

NP32=P21*P 21-933 

OP 33=-9931 

C2=6(352) *C224¢Gl(1, 7) *SF2 


APP-a- 3 = 72 
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72 


a 
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D2I5°AM S2RLAF 


C3=CG6 3,3) *523+G (2, TP *SP3 


BREAV=TATFAI ACG 1) FP 31407 HO S2HC BHM) 
BT=OT eAOZ* (GS (3,1) IP3L4C]*N? 324C3¥92 23) 
BP=P2=AQZ* ((G (3, 20 ¥SP2—GC 1,7) ¥CP2) E27 TZE ZO (GK 3p SDES> 396253) FCP) 


1*P33) 

N= & 

IFCNMAX=4) Ly uyis 

AOR=AOR*AR 

IF CEM(4) PADR@ERP) ty 1,204 
SPHESM2*CI34CP2ES>? 

CP4=TP2*5P 3-SP2FS>2 
PU1=221%231-0.766656565P24 
NP&1=P21°IP3149P 211 P31-C. 266 66666"? 21 
P&Z=921*>32-9.20000 000*P22 
DPG2=P21*993249921 9 P 32-0. 2000000080? 22 
PUSH 214233 

DP43=P21# IPZZeIP AL O33 

PH=D 22233 

NPHK=3.0*743 

C2=G6( 4,2) * C2246 (15 4d ESP2 
CS=Gh4,3)* 59346 2,4) 9 SPE 

CU=G( 94) #52446( 3,4) # SPH 


JR=EBF=GeIFAIRECS (4,1) FP U1 402 FPU2EC SF PAGS 45 UY PUG) 
BTS BT +AD72* (5 (491) FYPUL EC 24? G2 OC ZED? B34 THEN OLG) 
BP=SO-NOA* C (Glo, 2D SP2-G6 1,4) *OP2) F242¢ 2, C* (Gay TDESP 3-602, &) ¥CP3) 


TF PUI TLIF (GLH) #524 -G(3_ 4) *CPH) BPO) 
TFONMAX=5) 15595 

AOR=AOREL? 

IF CBM (5) A92%-ER2) 1,1,105 

SP5 = (SOS+S>T)F Cr? 

CPS =( 5734S 730% (597%-SP3) 

NPS 1: 921* 7241 9221 9041 $0. 257142858? 21 
PS1=P2,¥241-9.25 7142859 P31 

PE 2=2 2124223, 22857142" 32 

NPS 2=P21*I9G ZEN 21 PU2—=0e 223 S7 142%)? 22 
PS3=> 21924 30.14 255 7149P33 

FPS 3=P219 974 ZH? 216 P30. 14285 714% 33 
P5G=? 21* 264 

DPKG=P214#32G4K49> 21 PH 

P5522 226244 

NP55=4.9% 25% 

C22605,2) 4522461145) #5P2 
C3=605, 30% 52 34602, 29 *SP3 
CHEGC5y 4) *C2 4061345) #SPK 

C5665 550959546 (by 50 * SOS 


BR B®=$5,0*N) VW (G15, 1) ¥P51 40? FP526C 3# 25747 GPP 544C§ 4955) 
BT=HBV FADZ* (5 (541)* VO51 4 C2902 52 4C3¥ 02534 CGF P544+C54%IP55) . 
HPER>=ADZ®™ ((G(5y 2) 9SP2=GC 1g 5 VF CP2[D 25262008 (615, 309S2>3-C (2,5) 9 CP3) 
19PS Be S.OF CSF GDFESTU=$GU3y SDP COUDEPSS HG, OF KG (59 SDF SPS -GKU, SPE TPS) EP 


265) 
N= € 


T3 


767 
768 
769 


771 
772 
773 
774 
775 
776 
777 
778 
773 
786 
781 
782 
783 
TRG 
785 
7 BF 
7A7 
788 
7869 
796 


792 
798 
794 
795 
79€ 
797 
798 
799 
§6G 
AOL 
$02 
803 
504 
ANS 
AN6 
907 
AOR 
909 
810 
ob i | 
812 
313 


814 
617 


22957AM S23LAF 06/14/73 pace 74 


IFCNMAX"5) 1 9695 818 
is AOR=K ORFEAD aia 
IF CEM (6) FADZHERZ) 151,106 320 
105 SP6=SP2*5P5+CP2*595 & AL 
CPE=SCP2F5P5-SP2tS 22 322 
P61=921*#954-0.253958 25*P41 23 
NP61=P21*#9P514N721 *P51-0. 25296825497 41 224 
PE2=921F952-G.2390 IS23*PH2 RAs 
DPE 2=P21#9P5 240921 P 52-0. 23309 523")? 42 R26 
PES=P21¥75 3-419 047619F PZ 227 
NPS 3=P21*9P5 340921 °P55=-0.1°°C 4 7E19%0? 42 A248 
PHG=P21*254-0.11111 111 F Pa 829 
DP6G=P2199P5G4#NO21*P 54-0. 1111111199? 4h §3c¢ 
P65=P21* 755 334 
OP65=F21* 995541) 21° O55 8 32 
PEE HP 224255 $33 
NP66:5.9*°65 834 
C2=6(6 52) * S52 24+6(1,5) *SP2 835 
C3=G6( 6, 3) #023 #6(2,5)*SPZ AZH 
C4=6(6— 4) ¥ C2 446( 3,5) FSP Q27 
C5= 606,95) * C25 #G( 4, 3) ¥SPS 238 
Ch= 61656) ¥O2646(5,5)* SPE &39 


BR= ERG. 3# AD R*E (51551) *P61 O02 FP E240 3* 2674544064405 #265 +06 FP56) 
BT=AT ¢AN2* (5 (691) © 3P614C2 402624031263 +049 PAG EC 5¥9965 40 649956) 
RE=B?>-$A02* ((G (69 2) *SP2-G C153) *CP2) F2529 2.08 (G6 (6939S 23-6 (296) # OP2) 
1* PH E3608 (G06 4D FSPUHG 35 GEC PU) PHS HG. OF G (Hy 5) FS95-Glby ODE SPS) EP 


2654560" (G( by 5) *SP5-G(555) #026) #956) 944 
IFONMAX=7) 19797 345 
7 AODR=AORFAR B46 
IF CEM(7) FADER 1) 1,197 347 
£07 SP7=(SPUtSP4) #026 RGR 
CP7=(CPHESI4) # (574-524) aug 
P71=721*251-0.25252525"P51 856 
NP7 4=P21#9954 49921 P61=0. 25252525897 84 AS 
P72=921¥ 252-0, 262472424" P5 2 852 
NP7 2=P21*D95 249 21 FP 620. 247 4242499? 52 853 
P73=921* 24 3-0,212121 219 P53 854 
DP7 3= 214995349921 063 =H, 21212121997 23 ASS 
P74=P21*754-0.15151 5169 P5& BS6 
DP74=P21*9954499 21" 964-0, 16161 E1689? Su as7 
P75 =P21#265-0.09095909"P55 R58 
NP75=P21*9965¢0221: 965-0. 096 90909" 35 asa 
P7E=P21%2 65 865 
OP76=P21*02564NP 214955 R64 
P77=P22¥2665 RR? 
DP77=6.0*975 RA3 
C2=GC7, 2) * C2246 (1, 7) S02 464 
C32G(7, 3) *C234G6( 2, 7)"SP3 ABS 
CHEGL7 QPF 5244663, 7) FSPG RBA 
C5=2G64755) ® 52546 (uy 7) 4595 367 
CE=G( 745) #5264615, 7) RSME b6S 


AMPP=F- 3 = 76 


99 


Se I I Ae I SAE IEE LE oe eee 


D29SPAM S23L4F CA/14/78 pags 75 
C7=G7 y7I¥ C2746 (6,7) "SPT 869 
BR= WRT eo GHAOR™ (GIT, LPEP71LEC2¥P P24C3* 27 3H CGY P7TUECSPPT SE CHEPTAECTEPT 
17) 871 
BT=BT+AO2* (57,1) * 22714 C2¥N? 7 246 399? 7SECHH IP 7H ECSEIPTSECOFIPTRECT# 
19P77) R73 ; 


BP=LI=AN* ((GL7y 20 *SP2-Gl 147 V#OP2) H? PAH 2, OF (G17 SPESP3-GE2, 7) ¥CP3) 
1*P73¥ 3.08 (G0 794) FS 24 -G (3 7) CPG) FP TEE Gs OF LG (755) #S25-G ly 7) #525) ¥P 
27545208 (G07, 6) #SP5-G(5 57) #026) P7645. OF (GL 797) ¥SP7-G (6,7) CP7)#PTT 


3) 877 
: IFCNMAX=8) 15958 BTR 
! % AOR=8ORFAR 879 
| TF (3408) FADRH-FR2) 1,1,108 Fag 
135 SF&=SP2kCH 7+ EGP24S>? 881 
COB=NP2FSA7-SP2*S77 982 
PB1=921*>71-0.25176925%P61 RR 
OPB1=F21F IP714972 ALP P71=-C~. 25! 74825")? 51 884 
FE2=7221*272-0.24475524*P62 885 
DPB2=P2LFIPT2AENO ALE PT 2-0. 244 75524497252 ARE 
PR3=721%273-0.22 37 7622*PH2 2a7 
PPA Z=P21#977 F4NFP21FO73-C, 22377 E22¥%N2 63 888 
Peh=F2tF274-0,.15531118 FF 64 889 
VPB4=P21*# 99744)? 21% O74-0, 18981119¥9254 896 
PRS=221*7275-0.1399F C13" P65 A91 
0PBS=P21# 997549221 FO75—=G, 13985 013" N65 89? 
©4657 217276-0.07692357%PKE 892 
NPR E=P 21997649? 21% P76-04 U7- 9239749756 294 
OR7=P214777 Age 
NPB7=921#39774+N221° P77 8 96 
Fee=r224777 897 
NPBB=7.0*?87 BOR 
C2=G6(8,2)*C2245(1,5)*SP2 899 
C3=GUK, 3) * 5734602, 3) *SO3 30° 
C4=G6(By4)* C2 44613, 2) "SPU 301 
CS=ET8 SV FETISES (Hy ADESPS 302 
Co=G(B,6)* C2545 (5,5 °%) *SP6 303 
C7=6(8, 7) *C274+6(6, 2) *SP7 306% 
C3=G06y 0)" C2B4G(7,y EV *SPS 9¢5 
BR=52-8.0* ADR* (619 ,1)* PBL 402 PB24C 3* 2R3 tT GF PRG4*C 54295406 FPREtC7EPAR 
17+08¥P33) 907 
BT=BT FAOP* (508, 1)* TO8LEC2 PNB 2 eC ZFN293 + CHF DORK FCO 54999540 GF NO FhECTE 
1DF87#C5*1°69) 909 
FP=A®ADZE ( (G19, 20 *SFP2-GC1 1,99 FCP2) > 826 2, OF (608, 3)* SP3-602,8) FCPS) 
1*PB 3H 3.0% (GOSH FS *4-G(3y BD ECPK) FPB4HG OF (5 (895) F825 —-6 (4, fH) OPS) FP 
2854520" (608, 69 #575 -6(5, 8) #026) FPB645 .0F (G08, 7) FSP725 (658) F597) FPH7 - 
34#7e0* (G08, 8) *SP9=-5(7,6)"*CP8) * PBA) 313 
ITF CNMAK=9) 159,53 346 
3 AOR=ADRFAR a1e . 
IF CA4 (9) FARRER) 1,1,109 316 
109 SP9=CSP54SP5)*CF5 917 
CP9=( 6754575) (575-505) 918 | 
P91=721%291-9.251292C5*O71 919 ] 
APP-R- 3 = 75 
100 1] 
| 
Pama sacrum a 


ee ea al | 


22I95°%AM S23LAF 06/14/78 PAG: 


OP91=P21°9P914+0P21* Poi G6. 251 26 205*9971 

P92=921¥282-0,246153849P72 

DP92=P21* 993 2+DP 21% PB2-C. 245153844072 

PQZ=9 21 *7H 3-0.23075923*P73 
NP9F=P21*193 34N721% OBS -N. 2397692591973 

PIG=2727F2 940.2051 2A208 P74 
DPO4=P21FOPRGF+HP 214 PB4-0,. 2051 28299N>74 

P95=721*298 5-G.169230 76*P75 
DP95=F21*99954+92 21° P85-0. 169 23076" 9975 

P9E=9 21*996-0.12307692"P76 
DP96=P21#NF3 H+N? 217? 286-0. 12707692" N76 
PQ7=921*287-0.0556666F ¥P77 

NPO7=P21* 093 74NF21" PK7-C. CEFE6E65FN?77 

PQd=> 214233 

NP9B=P21*# 9938 eN? 21! PBA 

P99=>22*7288 

DP 9=8.0°P93 

C2= (9,2) ¥C224G( 1, %) ¥SP2 

C3=66(9,3) FOP 34502, 39)*SP3 

CU=C(9,4d*¥S244603, 90 *SPU 

(5=6(19,5) "5254604, 9) SPS 

C6=6(9,6) * C2? 64605, 5) © SP6 

C7=66(9 979 ¥CP74G6 (6, 90" SP7 

C8=619, 8) *C284+6(7, 29) *SP8 

C9=619,9) *C0294G6( 8, 9) *SP9 

BRE BR—F.DEAIS#(G(9,LIFPSL HC 2FPI2EC 38 297 HUF PQ 4C5%295¢ CHF PGG4 7H99 
17+C RE P9REC9# P99) 246 
BT= BT FAD2Z* (50951 #9991 C2407 92 OF 49? AFH CH*ENOGHL SCS #IAVGSHCH*NP JEST & 
i1NP974#C8*)998+C9FN2 49) 3448 
BO=R>$902* (( G09, 2) ©S92-6 11,9) FOP 2) F? 9262.08 (£19, 39¢S 73-6 (2, 99 *CP3) 
1 PO 3 3.0% 6609, 4) FS 724-63, GEC PY) FP9g th. CE (GK9y SPFSPSHG (G4, 9D FCESPRO 
29545.0%(5(9y 5) *SP5-G615,5 9) #026) FPIGHS 00" (61947) FSP7TH5 (659) 4597) FP97 
3+ 76 G* (G09, 9d F¥SP9-5(7,9) * CPB) *POBtEB Tf (5 (999) SP9-G( By 9) * CP 9) FO 99) 
IF CNMAX"10) Lyi10yl- 353 
AQP=AOREAD 25% 
TFC OMC10) FAIR-ERQ) 15151010 255 
$P1G6=S722*C99+CP2*5 279 756 
CP10= CP2*CP9-SP245°95 357 
P161=P21*791-0.25098039"P81 36" 
OP 101=7 21 * 929141921 *991=0 625 0980 39%) FA! 959 
F102=P21*792-0. 2470568 2%P be 769 
MP1 02=P21* 979249722 FPF 2=0 624670 58824) 287 aFY 
P103=P21*#993-0,235279 11*PR3 IA? 
NP1O3S=P 21% 9> 9349921499 3=0 6235296119982 363 
P104=P21*P 34=-3.21565527"P AL Ibu 
FVP104=P 21°17 944NF21 ¥PDG=b 6215686272 9RG 365 
P10 5=P21*P95=-0.1 897 3529"P RE 366 
NP105=P 2192 9549921 ¥995=0 6198235294) 285 367 
P106=P21%P35=00152541179P 96 346 
DP1G6=9 21% 0? 9649P21 9 P9H=0 0152941179) ORF 949 
P107=P21*997-3.19940 392*P 87 976 


APP=-A- 3 = 76 


D29G°AM SPILAF 65/14/78 PAG: 77 


DBPL O7=P 21 * 92974992: 297-0 610980392") 267 374 
P10 8=P21*993-9.05932 23529P RS 372 
NP1C9=P21*92 9H479P21*998—0 0058 9 23524) 282 273 
P169=P21#993 37% 
NPL O9=P21%029347P21 #994 375 4 
P1017=P224099 376 
NP1C010=9.0*2109 277 
C2=G01052) #2P24Glie 10) FSP2 978 B 
C3=G6C10, 3) *5P345(2,19)"SP3 979 
CH=G6 10,4) ©5446 (3,10) SP 4 Cr TH 
CS=GC1Cy 2) 85954564519) *SPS ORL 
C6=6(10 55) #5°HO6(5,19) #SPE 382 
C7=GC1Cy7)FSP7HC (5,100 *SP7 983 
C8=Gi 1059) *3P94567,106) SPS 99% 
C9=C1099) #5994519, 10) #509 gas 
C10=G6¢10,10) *CP10¢5 (9,10) #5719 386 
BREBV—1D oe PEAOQVEKGE Oy LP FP 101 OC 2¥210245 34296 Se CHF OLDGECS EPL ISH CHE 
LU64C7¥PLI 745 BF P1CAECI* PLO 9401 04P101)) 988 
RTZETHADZ* (GU105 1) ©9721 G614C2*NP1024C3 FNP 1D 34 CG FOP 10445 5 FNP 1IS+eC Geno 
110645 7*N72297 CHE I721 C94C9F NPY 9419") 21710) 290 


BP=R>-AD2*® ( (601092) *SP 2-6 (1,10 )9*CP2) §P10242.04% (GL1) 43) *SP3=G6( 2,5 10) 
LFCPIPFPLI Tes OFC GEL GI FSPU-G( 3,1 Od* SPUDEPIL GUE, OFLG6 10,5) F595 -614 
29106) *05) 8710545 OF (5010, 6) *SP6-G(5, 10) F5P8) ¥P10645 0% (G16 7dVFSPO7 
Ze60 6, LLIFTO7 DEPLETE 7LVE(G (16, BDVESPB~ G17 910) FCPEDF P16 848. OF (501059) 
&*SP99-G6(3, 199 ¥COF0¥ 2719949. OF (6010, 19) §S2>10-6(09,10)457109"P1610) 


1 SP=RP/P22*1,E <5 326 
BT=9TF3.5°5 397 
BR=B241.525 998 
B=SOOT CB82AFIRFATEATS+ IPH RP) agQ 
RETURN 10 ce 
ENO 1001 


APP-f= 3 - 77 


102 


P2OSPAM S25L4F 


| 
| 


SUBPOUTIN] TNTER (XgF y NVy ITIME gIORINIT g ¥ XP FFXX) 
DIMENSTON XKONVD = (NV) 9G 421) 


1 


IFCITTME.ND.G) SO TO 5 


1X 

CFC St41) =F (CSD 7X (StL) XCD 

2 NX 

COOL, DD HVi dy S-1d OX COLD HK dD 
2yvy¥ 

(9025 StL) 90255) OX C42) 0 O29 
3,NY 

(D039 JS) 9063p S-1) YOK C902) 6 0 9-2)) 


IF OX -GE eX C20 eANVA XXL TeX (NK) GD TI 
IFUXK oi TeX (2)) 

= Ftd + CXKXCLIIFNC1 1d & KKK CLIVE OXX=KO72DD EOC 2y 2) 
IFLXX oe ST. KCNKD) 
FENKD  CXXMKONKDVEVOLSNKD & CHK KONKD DEC KKRKONYD DED CI INK) 


PyNY 


IF OXK LTO X (KM) oD eX ea eX (KH dD 619 mT) 7 
TF CCKX#X CKD) LES (XC KH1I—=XXID 60 TO 3 
FOCKHL) & OXKKCK ELI DFEVOL KD © CK MRK CK OLDE CXK MK CKD DFC 2K OL) 


1yNV 


WRIT= (6510) XCKD y= CKD, 102 KD yg DCH, K) 
WRITS (5911) 9(19K) 99(3,K) 

FORMAT (F5625 5X9 (71005 ,10KI07) 
FORMAT (21% 52 ¢F10.5, 10K) 7/7) 


1238 


78 


1092 
1093 
12546 
1995 
1° ce 
13137 
1306 
106993 
1646 
1iit 
1212 
; el 
1214 
1¢15 
1216 


1926 


TEC 
L323 
132? 
1( 28 


1625 
ic 26 


FIC) & OXKeX CKD FNC 1, KD & CXKe CKD ECKKR KC KOT DD AV( 25K) 
IFCIORING VE 20) 59 TD 20 
WPTTE (6512) 
FORMAT(141,59H ¥ F(x) OTF 1 
OLFGsS///) 


1028 
12249 
vIF? 
1234 
1322 
1033 
12% 
1035 
1036 


C77 


22 9S7AM S2"LAF 


SUBPIUTING 
DIMENSION EL 


> OFFG(K SAF, EL, FEF y SLED 


DIMENSION 30959) 950999) 5 AMC 9) »GV (9, 9) 


CO 


OATA 


Cy 
re 
wy 


o? 
Pah eee Le ee 


NOnanrIanon 


MMOIN/ SL OSL /GY y 3M, Uy NMAX SIM 


G/ 
0 604C3554+95, 


C. 
263% 780E+05,y- 


0 S515K49 +] Gee e258 F472F EGS, 


20 4163955 +14 y- 


01399405405, 
215733154) 3, 
eOr 2693S HIS, 
0 & 88854473, 
el? ie1i t+ 
Pe ae a a I 
eo 2471175455, 


wes 


-. 181957: #345 


6 2247642405, 
~.9XZ2535 493, 
eb 74L9BI =H) by 
—e1SG7A7EHD4y 


-. 8019554} 4,- 


“DATA GT/ 


C2 CPOE SF TMi HED 
a a ae 


Ig 


ep rer a ee ) 


DATA 


ao 
o 


-.15 30005 +12, 
eARG373= 491, 
~e570U000C eC 0, 
01064095492, - 
~01*S554554#91, 
~e S3H494E 4) 2,- 


o 2C91S2E 0G y- 
0 553455° 4+00,- 


’ 
eo 13CH4IT +S, 


pete 48 


S87450F4C5,- 
e528 32E405;- 
~-249°926£ 40 Se 


e255C38EF4CS, 
eSH7C9I9E+O4, 
ol? 79AUE OOS, 
‘54H ft oh, 


~.71F 1565405, 
0555 T7TS2E€C 2,- 
m2. 1167540405, 
eGQ213QEtNby- 


e472 1UCE+04, 


e L297 S5EOS,- . 21311 GE tO Ny 
oF5471LGE4O 4,-2.1 470262 tOby- 


» SEER GCE CC 2,- 
oi t4064F 40 2,- 
« 335 602E#02,- 


«252 125E 402, 


. 117391 #0 2y- 
2 12°660F 0 2,- 
. 237 373E0C1,- 
0675 VDLF 40 1,y- 
e219 27KE 86 1y- 
2117 949F 4G2,- 


029707255+09,9 le 9 


=. 1992532 #32, 
e42*436s 7400 y- 
~e2446973= 431, 
e 44491 7E #1, 


aM? 


060 5255F 4F0ly- 


» 2059575401, 


-.-24697Z2E*C i, 
» © 7520535490, -.67° FB9F4Cl, 


2 274699E401, 


09919 IGE 4 OS 
eFFLIVWE*O5, 
eO21157E+ Ob, 


« 374662E #05, 
o S024KE7F +04, 


o226000F+0% y= 
0 3375862 t+ G4 7° 


o2279C7 I thy 
« 3668652405 
0419039 +0%, 


© 219502: +0 y- 
pte CU SEEIEFGS, 
e119L 25° +07 ee 


eo SU7T7TIE FCS 


758551 tbs, 
0 3724U90T #04 y- 


o S0L7962 +l ye 


480488 +03 
o T4BR72E+OS, 
09977892 #03, 


eSCONAGI+OC, 
0502727 ti, 


0 1167272 +0ig- 


204382: 40¢, 


© 222R7 32+ Oey 


01355557 +01, 
01892915 +07, 
05065782 +01, 
0 3706732 4CL 
el 774822 Cig 
o1GA@3035 +01, 


0 232032: tO y- 
eo 3901732 +029 
~ 2 484364: +Olge 


01121652 +62, 
0 752051: tbl, 


CF/14/78 


0102C77E+05, 
0102775E405, 
el 8 SKEKECOS, 


a7 eo 2AS3IBE +05, 


« 722422E405, 
e118 227E405, 


eae 
el GH ESCKHSEF EC? 
4675216403, 
e S316S55E405, 


e1 1 96E2ZEF) bye 


el 7TES4KERC5S, 
eo 3925€2F4+03, 


pags 79 


1539 


€21) 59° C210 950021) ,NB(C 21) 435021) 5 BEE (21) 5 SLL (21) 


1341 

1062 

1043 
2 3115739645 
0192185F4E65 
cL 22775E*CS 
—~ 24079435464 
~.398756E¢4C5 
~ 26569575204 
eb69703SE4ES 
=. 3 cbU7°F 404 
45785 7E54RS 
eo 1 PF279i 544 
-e1 3351425485 
01 B87K1 E403 
16259396485 
~e761424F 497% 


o2HE258E+05,-.100527E+65 


359419E+03,- 


e SQHLB2E+C1, 
e727 30000E+01, 
e111 8 IGEF) 2, 
el 446Z6E402, 
e16438A7E+C2, 
e6OR745E +01, 
el C23G3E 402, 
eo SLOEOGEFI1, 


vdeo ’ 
e2154E4E400,- 


el 7C1I2BE+N2,y 
©604521E +00, 


eo SER B27TE COL, = 


e1 G41 77E+CO, 
el 24258E4+62, 
el BBOIGE+ OG, 


+ 2442726405, 
et 271 36F+ Ob, 


BES. 3557IDy Le 27HGS5 ol eo SIC B3 910 444379106680 191 036777, 


#2e poser ener se. uit lees Tee 5396352.67114%,2.775UEy 


#2eB 4604, 2638595,y2 
+20 7F229,y 


Cy Beu? i 
7.5 7 


L5G? ot «St 


yi Agee ter’ 


9'49 4 


Ta l20 577 
ATA V30 6 TID 7A5 6 oF ce FILE g 0 554 SB Sy eA TINT go 7197 B Fy oe B15979y eo IL 72 Ly 

a2 F221 gtees 7127, 3 
R54%951.261176, 


ees ee 


APP-B- 


104 


Cigile caec 
£6799 s2he te. 


29h 


3-79 


39716925 BRB1552¢ B974Bg 2A SFALSy 2030352, 


eHi1950TFHC3 
106C 
106! 
014962 7E*G2 
~e87OCOIEFCi 
eSE7O9ILE COL 
el 325G5F404 
© 202725E+02 
e SEO41SE4C1 
Ge 1968 
4155291 £€92 
~e233831L F402 
2912027E402 
eSO7TRL BF OGL 
e1 SH335E4C0 
eS 191 36F 40 4 
o S88 35S5E49G 
eSSU7LSF CCL 
0 31 3354E400 
1378 
1079 
01299155405 
e 3774335403 
15 %2 
1283 
1C&4 
1085 
1086 


: Ei 


2740 


DPOISPAM S23LAF 


a 


1 


70 
STASTAWRITE(6, 2003) XSRF 


2003 
SILC SAWRITE (6, 2001) 


2001 FORMAT(SK yf 5et,°10465,E15.5) 


#1.237467,1.213335/ 


06/14/78 PAGE 80 


1096 


DATA SL/I.1646565 16 5649389 07H 2276, «749650, 2.39 21132,.3007F8, 1°91 
697892351605 7715 916135386 91. 20 E095 51» 2673185916 312199, 16528485, 
163250785123 0128 4, i. 266225,16 2280014) 1618587 Gy 1.14996151.106291, 


#1.0655352/ 


NATA 9S7.94938 225.50 3208 yg 0 24769075 6 3355079, 2 STH 7B ge 41418652453 SH, 


109% 


0493194, eS 32534y SEBUM Gg oe 59960190627439,,.630635,.,67861 Sy 1096 
06159955 65974175 035770399 6 5545 3192 53553 3525,511624, 4396057 1697 


OATA IFS1/1/ 
IFCYFG1.2222) GOT wt 
00 43 IT=1,21 
NACITI=AN*CILTI* (-.031) 
SLOITISSLCITY* (- 2071) 
OSCITI=OSCITI*.G90001 
CONTINUE 

TFG1=2 

CONTINUE 


oy KV FVREST(L,K) 
AP= AP 41 
SUM=SUM442*35Y (I,K) 
CONTINUE 

NC 20 Tl, 21 

SLLOT) =SUCID #VRFNS TT) 
tEEUT Salt CT) #VREDSCTS 
COMTEN TS 

J. 

NMAY-9 

ELC1)=1.15 

EL(2)=1.2 

EL (3) =1.25 

EL(4)=1.3 

00 3) Il=5,21 
ELCILI=HELCILTH1) + et 
CONTINUE 


FORMAT (141 ,4X,*IGOF FyF7. 1y* 
CZELOID FEE CI» SLLOID J =1, 21) LL 3% 


RETU?N 
ENO 


1098 
1099 
1100 
11¢t 
1192 
1193 
11494 
11¢t$ 
1106 
117 
L208 
1209 
1110 
LtLt 
Lite 
1123 
11146 
LIAS 
1116 
Tti? 
140 

L124 
1122 
Li2s 
1124 
1125 
1125 
1127 
1128 
LLZs 

USED TN THIS CALCULATION*///) 


Li se 
1133 
1134 


APP=R- 3 = 80 


105 


PRIGEAM S23LAF 06/14/78 PAG: 81 


SUBRIUTINE S2UP2(<DAT,IDAT,VKN) 1135 
NOIMENSTION KIAT(NKY) »TOAT( 309) 1136 
MKD=2 1137 
GO T 10 1138 
ENTRY S2yP3 1139 - 
MKN=2 1140 
GO T) 10 1141 
ENTRY S2)>4 1142 
MKD=4% 1143 
GO 9 10 1144 
ENTRY S$239?5 1145 
“KO=> 12 4€ 
rTP ue ce, eer 
ere op SEA +e ye 
sf? fT:-, wer pares 
a pedi yf i 
JIZ=4KCF CLT I-10 +1 1154 
JIZ=II2E4K IO 1 1152 
DO 29 JIJ= II2 5 JJ 1153 
JJL=JUL- IKI 115% 
IDA T( JID=L9Y TX( IIL, TKD KD AT(ITS) 1155 
20 CONT® NUF £156 
RETURN 1157 
ENO 1158 


APP-a- & = 1 


a ilane aetna ee 


— 


P2052 


TV EEF 


AM S2SABt OF /14/7" 


PROGRAM S2SABICIFILEZEFILE,YFILE,ZFL_&, OUTPUT HEG, 
+TAPEL=DFILE, TAPEP=FFILEsT AP B=YFILE, 
+TAPEJ=ZFELE, TAPE 6=3UTPUT) 

MEERAE EEE EEE ERER EEE EE EEE RHEE ERE E REE SEE CURR ES EEE 


> 1976 PROSZTAM. E. 4OLEMAN. LAST ALTI ZATION 23 JUL 76 
> FROM S22LAF 7 JAN 76. 

Se eee € 

TEBE ES 

3 PRELIMINAQY SIRT OF IATA BY LATITUDE AV? LONGITUDE. 

5S SEPARATION ONLY. NO SORTING YET. 

xe Eee 

Cheer ye 

S ICT3 COUNTS RECORIS 2640. 

Se CCE 

pe eeee 

> 4A7OCCR CM STORAGE RFIFTREN FOR LOADING. 

Cette 

DERE RRERRE ERE BE EE RHEE EES KEES SHE REFERER E ERS SERRE EERE REEREEE 


2004 


DIMENSION KIATC27,1 A) yIDA(79) ,ERGC33),F-E2G(33), 
tFHEDNC3C)y THE DCS) yg LTIM(8) ,UDAT (65) gf VUT (14,13) »XPA(13); 
#LNATC4,8) , 34 TTC2 515), JNA(15), 
+IPADL (12,142) ,TPANZ( 8,412,353) ,T ANN(100) , 
+IMAT( 13,12) 5 JMAT (35142) yKMATE 200) ,LAIL C7) 

EQUIJALENSEC FHED THE) 

EQUIVALENCECIMAT,J4AT) 


COMMON /ITOGEOG/ OMEGA, THETA, RIOTAgQWN4y XLT XLGyALT yg XLTMyXLG4 


DATA IPADL,LTPADZ2,T AUT £/614*9/ 

NATA ERG 411609105 63600 gS Bey S50 oy 2Feoy 2750 9150 Sy 1Sog lhe Sy 
$13 0 93014980529 Be De Ay Ge ghee 1 960 025 50413 505550 Sly 
He 2 a8 Fo ye TLy te Eby 5 AUP 605 2940135 eS Uy 
Fi h fy 1635, be CoP 

FLIMETE ES) B= OAT CE! Gs EEN NASR JFL YT 3 TET’ TELY=4 57) 

MES PR=SAEo T(t eye) 

MASK3E777 7777777777773 

IFGe=0 

SNB=l.e 

SLF=2. 

REWIND 

REWIND2 

REWINDS 

REWIND 

TG=S=CONV(TTT) 

WRITE (8, 200%) 

FORMAT (141 ,4Xy,*PODTESSING RE GUN TN 32SARF) 

CONTINUE 

IFGC=-1 

IOLT=0 

IcT1=0 

ICT3=0 

ICT4&=0 


APP=P= & = 32 


107 


82 


2729G670M S235 AST 05/14/78 PAG: 


TL=S=CONI( TTT) 
REANT1) IWC, IGS, (= AEDCT), I=1, IWC) 
IFCEQF(1)) 119,50 
CONTENUE 
MNEMS=FH=E9 (IWC) 
FHEDC IWC) =SLEFILE 
RIOTA=FHEV(21) 
ENCOVE(30,4001,LA3L) (CIHEN(T) yI=1,3),14FI (6) 
FORMAT(R%4,25 92% yAL10 1%, A8) 
THYTL=0. 
ALTL=0. 
NTHT=.C47 
WRIT= (2) IWC y IGS, (-HENCL)D gl= 1, IWS) 
GMT1=FLOAT (THE 90189971000. 
TRAT=FLOAT (LH=9(19)) ZFLOAT(T HEO(20)) 710900. 
GMT 7=GMTL=-FLOATCTH=D(17)) FF2AT 
CALL TNATI(LTIM, TMA yMON ZF FEI (27) gIH2 3026) 9119) 
WRIT® (6, 201)) 
WRIT£(9,201)9) 
FORMAT(141) 
WRITE (65 2003) FHEVi 27) yMON,LASBL 
WRITE (8520953) F4FIVC27) »MONgLA BL 
WRIT= (952903) ©HEV( 27) sMONZLASL 
FORMAT(SX,*IQRIT TIF SFA 2 sAL 0, 2K, SALI) 
TLTL=-999 
RLGEs =34 
TAel=<-994 
CONTINUE 
—* e¥erg 
> 2FAD MASTER FRAME IN®IT 
sewer 
PEADCL) IWS, IGC, (CC KIAT CL, Jd, L=1,T WC), S= 1,050) 
IEQF-=ENF (1) 
TF CIS OF SWE.D) GO TY 26 
IFCKIATCING, TSC) Nee 10HMAG 2ECORD) 53 TO 15 
ISA=° 
IS8=3 
JGC=1GC21 
CALL S2HKI(KDAT( 1,1) p> IDAT KSAT U1, SSS) 5 ST ANND 
OO 120 If=1,6 
ISA="SACTANN(TI) 
CONTINUE 
MO 240 [f=7,16 
ISB={S8+TANVGIT) 
CONTYNUE 
IFCISA.LT.800.4AND.IS3L T1150) GO TI 1% 
ICTZz=ICT3+1 
CALL S2U23(<DNAT(1,76S5) IN Ay76) 
ALT="NA(1) 
QKM=ALT#+6371-22 
PNM=7KM/1.385325 


229GRAM S2S5ARI 14414778 


OMEGA=FLOATCINA(5)) 7100. 
THE TA=FLOATCINAL4G) 97/100. 
IFCABS(THETA-THTL).LT..5) T4+TL=0. 
TF CABSCTHETA-THIL) .GT25.) TATL=0. 
IFCALTLe¢L_T21006) ALTL=ALT 
IF CAPSCTHTL) eG T0125 -6) NTHT=(THETA-T4TL D716. 
TAL T= (AL T-ALTLI/15. 
TAL TL=1.1*TALT 
TALT2=TA_LT/t 01 
IF CASS(TALT2<TAL TL) LT.i6) IAL TH=TALT 
IFCC(TALTL<OAL TIF COALT=TALT2) .GT¥.0.) JALT=TALT 
STATS FS LPPINT SOIS,ALT,ALTL,IALT 
SQG° FORMAT (1X ,2=>8.0,F%. 4) 
THTL=THETA 
ALTL= ALT 
TI2=45 
DD 268 IT=i5 25 
N99 250 JPstiee 
TU?=T Tee 4 
BATT. JJp TIVEFLOATCTUACTTA 155. 
786 CONTINUE 
eee ee 
> WRITE MASTER =2RAME OUTPUT 
VERE e 
TT2=tGC-2 
II1i=1 
39 CONTINUE 
JOA (1G) =KI0AT(1,I 11) 
0) 72 ESE ULs Fie 
THE TA=THETACO THT 
ALT=ALT#VALT 
QKM=ALT#+6371.2 
RNM=9KM/1.85325 
CALL GEOGA(T 4A) 
IFOXLTMe3T.1500) KLTM=XLTM=360. 
IFCXLT.GP 21966) XLT=XLT—369. 
TMA=TMA41. 
ILTC=XLT4/5. 
ILGC: XLb4/5. 
TALC=ALT/19). 
IFCILTCNETLTIL-O2.-ILGCeNE~TLGL) GO TON 20 
IFCIALL»WE.L£ ALC) 3% TO 20 
JOA(LI=AJIACLIFIFIKCALT) 
JNA(2)=SIA C2 DH TFIXG1000*XLT) 
JOA (3) =JIA (3) HI=IK(100."XLS) 
JDACSI=HJIACGDFTFIK (ING. * THETA) 
JDACUSV=IVACSD FIFICC 130 .* OMEGA) 
JOB (5) =JIACSD FIFE IKE 1G0.F XLT) 
JOACLID=INACLIVETE TX C100. *XLGM) 


APM=A- | = 8G 
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JDA(15)=IDAC ISD #4 163 

NO 330 JS=7,12 164 

JOA CIS ZEUIAC III ETIA (GS #33) 165 

239 CONTINUE L665 
ALT 2= ALT 167 : 

XLT 2=XLTY 168 

XLG 2=XL5™ 169 

INLT=TOLF ed 178 

ICT1: ICTi+4 171 

CALL S2U>ILKOAT(1, TT), JDAT,SIAT (19170) 172 

IF(17G63,GT.S) LESR:¢ 173 

IFGA=S4I77T(INAT( 2), -15) 174 

TFCTFGR NE I) TE 53- LEG RAL 175 

TF CIF Gt cE Te ANDO = GAC ED, 1) TFGR=1 176 

JOATC2)=S VAT (2) 0AN367777728 177 

CALL S2°AL (IDATC 1%) gLOAT,LOIND 178 

Ze eee 1793 

5 AND DATA TO FITCH ANSLFE OISTRIZUTION 1Aa0 

ao pare TAL 

TPA=AGS( GATE (1sI TIN /15 0#1 13? 

IFCI7ZA.GT.42) [24222 183 

IFCIPAGLT.L) TPAR1 184 

IFCI°GB.GT.L) GO TY 70 145 

OC 150 JJ=451? 186 

IPAD! (Jdp TPAD=L PAIL CSI y TPAD + IDAT( S41) OMASKA 1a7 

250 CONTINUES 188 

MO 236 JJ=1,3 139 

TOAN2(LDANS LP Ay IS) = TIANZS( LOAN, TPQ, Jd) LMA TOSS, LCHN) #4 ASKA 190 

°39 CUNTYNUF 19% 

a CONTINUE 19? 

Go fT) 12 193 

*O CONTYNUE 196 

SLDTAORINT 3002,TF GC, TE %F,TOLT 195 

092 FORMAT(1%,315) 126 

IT1=TT 197 

IFCIFGC.LT.9) GIT? 30 198 

IFC TI OF SNE SOeAND.IMLTLE} 2) GO TI 1)2 199 

IFCIYLTeL F.2d) GO FY 30 206 

ICTU=ICT ees 2c4 

SV eres 202 

5 POINT OFT 6+ SECOND ®LTTSH ANGL= AISTRIZITTOVS AND ZERD SUMS, 203 

sheers 294 

SNAREINACLSD 205 
IF(SNB.LT 24.) SNSBt4. 206 : 

NM 340 Lf=1,13 207 

JNAMTID==LOATCSVACTIDD SSNBOS 208 

763 CONTINUE 299 

ALTA- JNA(1) 21C 

XLTA=FLIAT(INAC209/1006 243 

XLGA=FLIAT(CINA(3)I7190. 212 

XLTMA=FLUAT(JNOACEII7106~ 212 


APP-f- &G = AS 
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XLGMA=FLIATC JNA(13))/100~ 

BAA=FLOAT( JIAC7))/10000. 

FLA==LOATCJIA(BDI/2000. 

HMNA> JOA(9) 

CALL AUTSILI9N,<MAT,15, WD, KWON) 

WET TI (9, 2005) XK THA,XLGMAZAL TAyTILT, PAR GFLA gHMNA 


2505 FORMAT(S/10X g*MLAT =*,F8.2," MLONG =%,F92725”" ALT =Fy 
+F6.1,* TIME INTERVAL IS F,TGS1CX, FIV =*#,F RB. 3,* Ay 


+FB.2,*% <aMAy =*,F3.1) 
WRITE (9, 2001) 


2001 FORMAT(/35X,*P-ANG PAL Ni PAP 42 PAz2 NZ PAG 


4 FNG PAS NS PAFS NFB PABE NSF) 


NO 176 If=1,12 
XPA (TI) == LOATCA5*(TT=-1)9#7.5 
IMAT(13,TIVSSHIFT(TOANL (1 IT) y 45) 
NN 12730 JIJ=4,12 
TIMATC SI, ITP =TPAIL0C IS, ITD. AND. MASKAB 
140 CONTINUS 
2009 FORMAT( 2K yF5el gl 49175 STE, AI7) 
2317 FORMATO 2K» seigl¥y =~Gely ZF Sel 3 3F9.1) 
2700 ©60CCONTINUE 
KWO=KWODFL 
CALL AUTSOCIMAT, KYAT (KWO) 4156, JH99, 6499) 
KWOD=KWOFKWIDN1 
S¥EV s 


SET UP 2-AL94A COINS MOJE AND FRONT NEFF OA MATRICES 

SeRRE 

DO 130 If=1,12 

ON 260 Js=iy8 

JMAT( SS yg IT) =IOAIVZ( ID y TI 91) AN VMASK3 

IF (J3eGT.5) GO TD 200 

IJ= 2" JJ-t 

TOUTC TJ, TI)=UMAT (II, IT) 

IFCIYSE9.1) IOUT (LE 9,13)=0 

LOUT( LJ, 13)=TOUT (TI, 13) eT OUT (Iu, ID) 
769 CONTINUE 
POLL FORMATI2¢€, 5 e525 2T7y2TR 2155 1741009) 
290 CONTINU 

KWO=¢WODFL 

CALL AUTSOCIMATy KYAT (KWD) 99% 5 JWOD, Kd IN) 

KWONEKWIFKWIN=4 

TOUT(11,13)=0 

00 320 If=i,12 

DO 350 Ji=1,8 

IMA TC SS) IT) =TOAVZC IS, I 192) AND oMASKR 
359 CONTINUE 

TOUT( 41,11) =JMATOS,TT) 

TOUT( 115143)= TOUT (11,13) TOUT (14,IT) 


Ce 


APP=R- & = AG 
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| 
| 
<20  CONTINUF 26¢ 
KWO=CWIDe1 264 
CALL AUTSOCIMAT, KYA TCKWD) 995 y JHDD, KY 0) 267 
KWOO-KWO+K WID=1 26" 
+ eats 269 “ 
> SFT UP TASK JET AND ND OF OBS MATRICES 27 
Ph 274 
TOUT. 13,1 3=0 272 . 
PO 210 If=it,12 278 
MO 276 J=1,8 27% 
IMATO SS, IL Y= TE QV20 Id yp TT yg 3) AND MASK? 275 
229 CONTINUE 276 
TOUTC13, 11) = MAT (5,17) 27? 
TOUT(13,13)=IUT (17,130 #TOUT( 13,19) 278 
745 CONTINUE 279 
KWN=KWONeL 22¢ 
CALL AUTTOCI4AT, KYAT (KWD) 9955 JWOD, KY IND 284 
KWOD=KWO#KWID=1 2a? 
ne 220 If221,12 283 
NO 359 Js=iy8 286 
SMA TOSS, TITIZSHI=TCTPAIN2CII,T 191) 5-45) 245 
TF (Jde6T.5) GI 19 760 2 8€ 
[J=2* JJ 287 
IOUTS TJ, TT)=IMAT (Jd, IT) 288 
IFCIUTSCEQ.1) LOUT(L 4,130 =0 2ag 
TOUTE TJ,139= TOUT (LT #413) *LOUT(TI,IDD 2o0 
"50 CONTINUE 294 
TOUT(12,13)2=9 292 
INUT(14,13)=0 2Q% 
TOUTCL2,TLd= IMAT(R.1TD 296 
TOUTC14,T1)= IMAT(35,11) 295 
IOUTL12,2 39= TIT (12513)eT OUT (12,FT) 296 
TOUTC14,130= TOUT (145130 4I OUT (1 4,IT) 297 
740 CONTTNUF 298 
KWN=CWONE SL 299 
CALL AUTTOCIMAT, KYAT CKWODD 995 5 SHOT, KIND) 366 
KWON: KWIeKWID=1 301 | 
IGC=2 302 
WRIT (2) KWI0,I5Cy (KYAT) yTHL,KNODI 02 
XPOA(L 39=99. 306 
NO AC TI=1913 O58 
ISL =5 C6 
NO 122 Jt=1, 14 307 
ISL=TSL#TOUT (Ju, IT) Toa 
£20 GONTINUS THQ 
IFCTSL«GE LG) WOTT= 49,2007) KPACIT) »CTOUTCI, IT) »¥=1,14) 74 
IFCIT SED L BANDS TIL oe ST eld) WRITE(S, 2927) KPALTID, (IOUTCI,IID, 
#T=15° 4) 12 
oe CONTINUS 313 
P2027 FORMATO CA,  5ely ZETA, TIDY T16 
IFCIZOF.VE.9) GOT? 16C 315 
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112 


O*9GPAM S2SA6I CAS147/74 


SVreve 
C ZERO CONSTANTS FOR NFKT LAT,LONG A9XK 
Te Sere 
IOLT=0 
$8 CONTINUE 
NC &. Tl=1,12 
JNAC(TI) =) 
90 &. JSF1,12 
IPAD1L (JJ, TT) =9 
IFC IJIeGTA9) GI TD 59 
TPAD? (JJe IT, 1) =35 
IPANA(C IJ,TI, 2) 26 
IPAD2 (JJ, TIy 3) =9 
“C CONTINUE 
IFGC=C 
JNA(L2)2) 
JOA (14) 23 
JOA (45) 29 
IFCXLT.GF 2906) XLT=XLT-360. 
XLT4=x_T4 
XLG1=¥LS4% 
ALT1= ALT 
HO=(SMT7TH+=LIATC(KOAT CL, TLYL)a* TeATIs 3500. 
CALL TOATB(LTIM, TMA y MON gH%y ID, 019) 
ILTL=ILT? 
ILGL=ILS? 
TALL=TALS 
GO T) 39 
100 CONTTNUF 
WRIT= (38,2502) ITT3.,ICT4 
7907 FOMPMAT(1K,I5_9* PFES0R0S SPFAYV FROM DFTLE¥s 
#1X_TS5,* RESOQOS ARITTEN CN ZF FILE*) 
T2=S*CONJV(TTT) -T1 
WRI T= (8,2003) 2 
CCG? FORMAT(2K,*2RQ29C=ZSSINS TIME =OR NRATIF YS*,F10.3) 
ENDFILE? 
GO TT) 50 
110 © ©CONTTNUE 
T2=S=CONIV(TTT) <7) 
WPTT' (68,2095) T2 


7095 FORMAT(2%,*TOTAL > 20T5ESSING TIME FO? S7SAHR TS*,F16.3) 


ENN 


APE=R=- & = 46 
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SUBRIUTINE AUTCILI4MAT, IMATE WI, JHN,<K AN? 


TERETE HEHE EES EEE E EEE E EEL USER EY SEES ESESESER EES SESE RTEREEEER EEE 
ce eet & 
> 1976 SUSPRISRAM. =. HOLEMAN. LAST AT REO 17 CCT 77. 
> CGVEATEN & MAR 76. 
ee oeee 
“Heese 
> FIPST VERSION OF AJTI“PCACKING 2NUTINE 
Steers 
=e SER EKEEEEEEESETCE SFE EER EE EEE SESE SESEEEEE EEE SESE SEREERSER ESSE 
NIMENSION I4MAT(1) 5 MAT CLD gKMAT (512) 
DATA ICTs /97 
XLGK=2.079 441541 
MAX Kz =39 
ICTG=ICT441 
JwO=1 
KWO=1 
MAXY=1 
KW0 1-6 
KSUM=: 20 
IFCTAGeLE 2S) TWI=) 
NWP We 20 
LWN=1 
IFCIWO.EV.9) 69 19 SO 
NO 1. Ll=1,fw 
KMAT(II)=20 
IFC CTHIFTCIMATIT 1), -49) eAND.777778).NE.0) SO TO &O 
KMATCTID= 0 
IFCIMAT(LTI2EV-C) 30 TO 1G 
KMATCII)=ALIGCFLOATCIMATCIT) 99 /XLGKE1. 
CONTINUE 
ITF CKMATCIIY GT eMAX<K) MAXI=IT 
ITF CKMAT( II) GTeMAXK) MAXK=KYAT(IT) 
KSUM= KSUM*KYATCITD) 
IFCKSUJM.L£.220) 39 FN 10 
KSUM=0 
KSUM= KMAT (IT) 
KWO1=KNOLOL 
<6 CONTINUE 
IF OMAXK.GT.20) ARITE(6,2001) MAXK 
Serey 
EMNCONE 4929 LIO5IS 
Bepve 
TEQCMBKK.5T.7) NW29d2 13 
NOOWZAO/SN WOM 
JWN1= (IW9-4) /NW2 WE? 
30 25 TT=lyTWV NAP 4 
LWO=LWI44 
JMAT(LWD) =5 
ICH=451 
MWO=MINGCIIT+ NWPw-1, TWO) 
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2091 


Sr eee 


OO 20 JJ=LI, MWO 

ICH=1ChHe-voPW 
JMATILWODZISSYTX CI SH gNOPW UMATILWD), CME TC JID) 
CONTINUE 

JWD=_ WO 

IFC JAN.NE. INDL) WRETE(E, 2001) ICT4,IND, JwO1 
FOR MAT(1%,#FR93LEM IN CONING AT*,4T3) 

KW 1=KWO14tL AD 


3 ENCODE VATA 


TV eevse 


IChH=)0 

NO 32 Ife1,fWwn 

IFCKMAT(LIIY2EQ29) 390 TO 3G 

NCPW=3*KMATC(IT) 

ICH=ICH=NCTPA 

IFCIGH.LE. GS) LWI=_ ADL 

IFCICH.LE.9) IC4=61-°NCPW 

JMAT(LWI) =ISSYTX CT TH yNCPW IMAT (LAN), TMT TCT DD 
CONTI NUE 

CONTINUE 

KWO=L WN) 

IFC(KIN NES KANL) WRETE(6,2001) ICT4 JAD, KWO,KWD1 
JMAT(1) 2) 

JMATOCL) = ISSV TX (46,15, SJMAT (1) 4 TWO) 
JMAT(LI=ALSBYTX(031, 15, IMAT (1) yNWPW) 

JMAT(L) HLS AV TXC15515 5 5MAT (1) ,UWD) 


SMATCLIRALSSV TK C1 15, IMATC 1), KWO)D 
PETU2N 
ENO 
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P20GTAM S3PE4ARA CH/14/7% PAGE 91 
PEOGIAM $3 ZAEACAFILE ,FFILF,Y FILE, OUT 2UT=64, 1c 
+TAPELZAFILE, TAPE 2c SFILE TAP” AZVFILE, FAPES=2UTOUT) 11 
~KESFERSESEEEREREE EEE TEE EC SEEES SESE EEEEFEEKE EEE EE FESS KRESS ECEE EEE 4? 
~F eevee 4 
> 1976 PROGRAM, T. SPENCER, LAST 4LTI2ED 16 SEF 77 14 
> 197& $83 DATA RENYTTION SYSTEM, CREATFN 164 JUN 76 15 
Se eeeee ; 16 
Theory 17 
2 SSuNTees Uses 1A 
~ 13K -==-POCSITION JF CURZ=NT RPECORY IN 16 3FCIND SPOUP 19 
> I0Kie-OOSITION OF CJR2Z7-NT PFCOPN IN A SECOND GROVE tae 
D TSTPee-SECONIS JF DATA SEAN SINTSE LAST CNPIT RECORC REAN 214 
> [SCwWeeeGQJUNTS SECONIS 3% DATA 19 BE AZITTEN ITN CURRENT 250020 2? 
- IST ---SFCONIS DF NATTA SPORESSED FOP FILE. 23 
> ID Tl e"-COUNTS NIMSE? IF FILES P2OCESSED, 2% 
> IST2-"-COUNTS NIMBER YF AFILE P= CORDS R540 FIR FILE. 25 
> ICT&s--COUNTS NIMRER D© A2ILE SFCORNS WATTTEN FOR FILE. 76 
~ FLAGS USFO 27 
J: beta 28 
a 29 
> 2 FORMATS ME2N DATA TAGE, NOLISTINGS, 36 
Sears 34 
> 4F2GG CM STIAASE REVITPED FOR _OADING. 3? 
Teese ee 33 
Sr eee Bu 
FUSER SORE SULESEEEOEEERCE LEER EE EET ERESEERE EET SEHE PE RSFESEEEEEEE 3S 
DIMENSION FAED¢30) pTAENC SG), ICAL (4), JGAL(G) y KCAL (6) 36 
DIMENSION LA3L C3), <NAT C76) oLTIM(S9),. VAT (4,9) 37 
DIMENSION LIATC25, 270) pp JOATI(Z 0416) gMdAT(12,54) 38 
DIMENSTON TANA (22). SANA (CG g®) gKANA (56) yL ANAC 30D 39 
COMMIN TANGA, JANG 40 
FOUIVALENSEC TIANA, CANAD 44d 
FOUTWVALENCICFHED,T HED) 42 
EQUIVALENTS TICMBAT, CVATC2)) & 3 
MASKA=SHIFT(1°7 45) 44 
MASK3=7777777777777773 45 
MASK*=777773 46 
MASKN=MASKOOL 4? 
QEWINSL GR 
REWINN2 4g 
REWINIA 50 
oe ee eq 
> IMITIALTZE FILES AND F©RQ0 CONSTANTS 52 

Testes 53 \s 
NO 170 I[f=i, 54 54 
KANAC TID =4098 55 

12¢ AONTT NUE 56 « 
TWHITH=0 57 
ITANA71 58 
27002 FORMAT (141,5X%,*%5 3-7 PROTESSTNG B5GUN T' S3PARAF, 59 
4242¥%, M109 75K ,802BTT TIS%, TAG 50 
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#/5Xy,*OATA ASDUISITION INTFRVAL=*% 5 2F1 50S 92Ky AP) 
ANAT=QAT=CIITY) 
ATIM=TIM=CITIM) 


ICT2=9 
26 CONTINUE 
Sheen es 


> REAN FILE HEADER 
See RRe 
PEADC 4) KWOyKGCy (FHED(K) y K=4y KW) 
IF(FQF(4)) 100,15 
{0 CONTTNUE 
ISCT=¢ 
ICT3=0 
ICT4=0 
LG6C=? 
ISCW: 0 
ICT2=TCT2¢1 
KCAL (1) =<€CAL (2) = KCAL (3) =KCAL (4729 
THEN. 30)=SL3FIL? 
ENCODE (30,4001yLAGL) CIHE DT), T=1y, 31,2495) 
S001 FORMAT (2%, 2552XyA15 91K, AB) 
HRL=5HED( 8) 73607. 
HP2=FHEN(13)/36006 
WRITE (By 2001) ITIM,IOTT yb ABQ gHR1yHR?2, THED(5D 
GMT4=FLOAT(THED(13))/109C. 
TRAT= FLOAT (THED(13)) /FLOATCTHED(203174_ 00. 
LTIMé1)=1975 
LTIM(2) =1HE) (16) 
IF CLE IM(2) oT. 180) LTIM(1)=1977 
CALL TOATS(LTIMy TM4 yMONgHR1y JD 401A) 
GMT Z=GMTL-FLOAT(I45 D179) 4 T2AT 
2602 FORMAT(* TIME JISTREPANCY* 
FRR REE 
5 BEGINNING Of NIQMAL 2=AD LOOP..e. 
3 EUV Ee 
260 CONTINUE 
PEANC1) TWO, IGCy (CC LOAT(T, J), Tait, IWC) , J=1, 730) 
IEOF=E0F (14) 
IFCIFOF.VF.I) GI TO 310 
TFC ING Ge 23 eIReLG30S5T 220) 39 TN 20) 
ICT3=ICT3+1 
ISC9=C 


> BEGINNING OF ONE SECINN PROCFSIINGsc oes 


210 CONTLINJE 
ISCT=TSOT#t 
ISCR=TSCV+1L 
DO Gl ITIl=1,76 
KDAT(ITI)= 6 

aie CONTENUES 


APP=AR= 5 = 32 
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ee 

> JNPACK ONE SESONN. 

“se eeve 
CALL S3UPALT OAT. 1, 1S STR) gKMAT, TCK2) 
CALL S2PAL (CVAT(75) yLOAT, ICKL) 
TFCTSCT.YF.1) GIT) 56 

peeerer 

7 3°GINNIPG OF FILE 2°77FSSING. 

G1 SS" BE 
LWC =f SCW=JW> = 
INOW: ECKS 
TFCITK205T 65) INIA=ISK2 
IPF G=KOAT (1) /16-INOW 
ILAS=9 
Hs (SMT THFLIAT(KMAT (1) *T RAT) / 3600.6 
THEM: 26) 257 
FHED(27)=42 
THEO 29) 21326 
WRITE (2) “W251, (F4°9(T) gD =1, KWO) 
ICK 3=MOV(T35G48) #1 
IFCITK36VE.ECKL) T 52 TREGHT CK 1-ICKE 
ICOM= 9 
ICALCLDSESA_C2VETCOLC3)=TCA_(4)St 
ICKC=TCK.=KIAT(19 7756 
CONTINUE 
ICKC=KNAT (19.7255 
TECTICKCeNS«ECKLY 3u TO SS 

“eu se 

C TP ANSEES ANALDS 

Se eeeae 
MO 410 If=21, 22 
TIA=TT#4) 
TFCKYATCTIANSLT £4778) TANACTIDEKIATC TTS) 
CONTINUE 
JAN AS Ly T 3K) =KIATI7 2) 
JANAC? I 3K 1) =KIAT(7 7) 
JANALS,T341b SKIATO 74) 
JANAC HTK 1) 2KIAT(75) 

Sc eee 

7 SMECK FIR TIME GAPS, 

Te eeeae 
INOW KNAT (1) 716 
INOW: JNOA=T3F 5 
ICK=MND( IND 515) #1 
TE AP=INO4=TLAS 
TE(T>AP. ST ot) ISAC 2V=TCALC4) EL 
ILAS= TNOA 
TFC I3AP ONT.) WRIT? (6, 2603) IGAP,INDA 
FORMAT(Ak,13y% SELON) GAP JETECTED 4ST? yT@) 
IFCICK2sLE 63) T3K2=T5K 
TF{LSCeNESG) 59 TI 326 
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LANAC1)=< IAT C1) -15" (TCK=-1) 16% 

2604 FORMAT(1%,*35A2 AT “©GINNING OF MAST72 FRAMES, 164 

+* AT*,15,1T3, 21139) “65 

725) CONTINUE LAE 

LGG=LGGHT 502 165? 

ISCW=ISC4#1 16 

oS ae 16% 

> SHECK ON LERPRS SALTSROTTON LOGIT. 17¢ 

“OC RRU ED 1714 

ICALSSS 17? 

ITA=¢ ea 

NO 39 Il=2,38,12 174 

IIA=I1TA+t 17S 
TFCITALS 261. 0R TIAL E203) KCAL CIITA) =F SAL (IIA 41) 176 

ICALCIIA) =SAIFTCKVATCIID, -1%) 177 

IFCITA.LE2. 2-OReTTALEV.4) KCAL CTIAV=L CAL (TTA-1) 178 

JCALCLIIA) =9 179 

IF CCK DATC IL #2) 4505) (650 O-KDAT(ITI+2)).GT.G eANDe 196 

# (CCKMAT CIT #2) KOATCL TOL) DE CKIAT CIT #21 -K VAT CT T4390) 184 

#.G6T.2) JCALCIIAI=1 192 

KOATCLIV=KOATCIT) eo 2 ND. MASKS 123 

; 36 NONTINUE 184 
KCALS1)=KCAL (1). AND. JSAL (1) 1aS 
i KCAL(2)=€CA_ (2). ANY. ICAL (2) 156 
KCAL 3) =<GAL &3). ANY. JCAL (3) 187 
; KCAL(G) =<TAL (4). ANYICAL (4) 1RR 
, ICAL2=KCAL (LDF BEKSAL C2) FGFKTAL (2) F 24 ONL CG) 189 
JOAT( 1, 1335¥) =KDAT CS) ¢SHIFT(I CALA, 45) 195 


d TFCKOAL (3) el Qe Le ANVAKCALCGIANE 1) MVAT Ly 4I=ENDAT (1,4) 4 4A SK) 
: IFC KCAL(5) ED ele ANIKCALCS).NE SL) MIVT (1,3) ="NAT (1, 3) MASK 
TFC KCALOL) cE Dele ANY CKGALC 2} .NE 01) MYST (1, 2) =MOAT (1,7) #MASKY 
? TFCKIAL(5) cD VeLeANVAKCALCAIONF ol) MIVT CL, 1) =4NAT (1,1) MASK) 


KCALI5) =<XCAL_ (2) 195 
KCAL(6)=<CAL (4) 1% 
IFCICALI¢NE} 9) WOETTE(B, 2005) INOW, T74Ls JCAL yKCAL,TOALB LOT 

2709S FORMAT(1X,T9,2C1X,%L1) 2X yOl 1,15) 198 
TERRA 198 
G SFT NOISE TeAP 2co 
TERE EH 201 
OO 82 KK=i5% 282 

IFO MIAT (1, KK) «GFE e4ASKD) GOTO 170 2u3s 
IFCICALS NS. GY ARITE (8% ,y2006) INOW KC, (MIVATC IT KK) yp T=1y 12) 204 
TFGR=C6 256 

TEST= FLOAT (ADATC2, KK) I CFLOAT (MIAT (3, KK) 09°21) 296 

TF CTEST eo aT el bo oe ANDe MIAT 62 KK) 6 GE2253) 15.0 TO 130 eny 
TESTSELOAT (MOAT 3, < KDI SFLOAT (MDAT (2, CK) -DR14A) 208 

TFC TEST. ST el Ge eA NVeMNATOCS KC) .GE6253) 50 TO 136 2493 
TEST=FLOAT (YNAT C11 KK) ) SFLOAT CMOAT (UL 29 KK) 098618) 210 

TE CTE ST ecb el Geo ANDVeMDAT (119 <K) GE 255) 6F TO 150 ?i1 

TFS T=FLIAT (YOAT(12, KXDDSZELOATCMOAT (Lig KK) 2ORW1AD 212 
TFCTEST eG ei bee ANDLMIAT (125<K) oGE. 255) GO TO 130 eis 


ADP=eRe G6 = 94 


27 7G7P AM S3°ABA 


90 149 $J=4, 19 


SUMM= (MDAT CS det KKP EMI ATC Jutt yg KKD D7? 


IF (SUMMS_& De) 


TEST=FLOAT(YDAT(C JI. KK) ) “SUM 
IF CTH ST ea Fo 3 eS e AND MAT (S55 < KD GE. 37) 


140 CONTINUE 
IFCIFG3.NE 1) 
230 © ©6CONTYNUE 


IF OCMYAT (1, K<) -LT.4ASKD) 


WRIT? (8, 2956) 


C CONTINUE 


MOAT C1 KK) =4 VAT (1 KK) SPASKY 
JINOd KK y (MO ATCT KK) gI=igt 
FOP MAT(10,19,12,1278) 


JOA TC2,TITW) =KOAT(7TS) 

PALL AUTIOCADAT, JOATC3,ISCW) 548,I5C0N, I07) 
Tf CIT9.GT. E59) 
TFC TSC9.GE.TGS) 


GO TT 213 
a¢ CONTINUES 


LeEers 


Fe CORD PEADY TD 


~e ees ee 


IFCISCW.LE.D) 
ICTG: ICTe +t 
JWC=TCNMEZ 


oJ ¥9 2Cé 


BE W2ITTEN 


IF CITNLEY. 159) 
JNATC SWS, TSDH) T1947 AT PEC ORY 
CALL AUTI9(KANA,LANA(2) 954, ICDyI39) 


LWC=TONe? 


LANA(LWO)=13HHK? 2° C09RN 

WRITE (2) JAD TSIMy CCIDAT CIT D4 daly 4504 TH, TSOW) 

WRITE (2) LWS gly (LANACT) yI=1,L WC) 

TFC JYAT (1,1) -NESLAYAC 19) POTNT 2904, LCF 3,IST4,LANA(1), 


+JDOAT( 1,51) 
5¢ CONTTNUF 
90 72 Tl=t1,54 
KANA( TT) =4U92 
(at CONTINUE 
ICOM=9 
ISCW= 5 


IFCIFOF NF.0) GIT) 


LUG=4 

ICKL=ICK 

GO TT) 66 
710 CONTINUE 


~P EEF ER 
A 


ZF ENCIUNTERE). 
ee ee 


TFCISCW.NE.I) 
ENN FYLE2 
GO TY 26 

160 CONTTNUE 


O2IST™AM S3PARA 


SERENE 


> ESI ENCCUNTERE), 
Or ee 


ENO 


NF / 14/7: 


PAGE 


PIISPAM S3PARAN G6414778 


SUBRIUTINE SZUPA(T IAT ZNODAT, TA DA) 
IVAT FIL= TO BT UNPACKEN LESS WIRD AND 35299P COUNT 
NIM AT FILE UNOATKED 
TANA FOSTITION IN 16 S=F> 320UP 


OIMENSION IDAT €33) sNODAT (75), ISTR(22) 

COMMIN /K/K( 469) 

NATTA TSOR711 5195 39-9 7p G95 hq By 2p by 3y 2g lt glGg isha? p6y5¢392/ 
IRIT=16 

NODAT(1) =ITOAT(L) 


FORMAT (1X, 4D. 452715) 

J=Jer1 

IIT= TSHIFTCLIATCTWNY 5-16) 

NOOAT (J) =LIAT CIWS) -SHIFT (IT.16) 
INATCIWND) =I 

EF €F eEQ. G6) SOT) 16 

IF (CYALIT «STs 44) SOTO 20 
IS8IT=L[3If +15 

CONTTNUE 

GATO 35 

I=] +1 

J=J-1 

IP LTT=- TBI 4&4 

TWO=T WH] 
TI=ISHIFT(IIVAT(LW)) y-I BIT) 
NODAY CJ) =CIIAT CIWIVDKSHTFT CIT, IT S8ITI) 7% © (L6-THTT) ¢IIAT CT Wns) 
INATC(IW9) = Tf 

TRIT=IAL +15 

GUTO 13 

IT= IS4HIFTC(TIATO14) 5-12) 

NODA® (72) =ITIAT (14) -SHIFTCII,12) 
TVAT(14)-IT 

NO Gs Tal, $ 
TI=ISHIFTCTIATI14),-15) 
MODAT(SO*T) =TIAT(1L4) -SHIFTITT, 16) 
INAT(14)2=IT 

TIZISHIFTCLTIAT(L7) 5-129 

NODAT (SGV=TVAT(L7) -SHIFTC(II1,12) 
INAT(17)=I11 

Wi Si Leis 

LTISISHIFTCTIVAT (Le) 5-12) 

NOOAT (55-1) =IOAT (19) -SHIFT(TT, 12) 
TOAT(14)-=IT 

990 65 IT=1_4 


2OOGIAM SZOAWA CF 4147738 


TIS ISHIFTCIIAT(L7) 4-12) 
NONMAT(62-T)=TOAT(L7)-SHIFTiTI, 12) 

TOA TCL7 SIT 

NO 70 Tsi3? 

[I=ISHIFTETIAT(LH) 4-12) 

NODAT (58-T)=IDAT (13 9-SHIF TITT, 12) 
INAT(15)=ITI 

ON Al T=1,2 

CO ec J=1,5 

IT=ISHIFTCTIVAT(19¢#°) 4-12) 

NODAY (52#S5*T=J)=IVAT(AR*LI-SHIFT(ITI, 1! 2) 
TOAT(184+1) =LT 

CONTUNYE 

IIS ISHIFFCLIAT(15) 4-24) 
NONATI75V=SHATETELT VAT (1©) SATE TCT 52 4) 9 9386) #INAT (14) 
TNAT(15) = If 

0 96 Fot,3 

II=ISHIFFCLTIVATCL5) 4-12) 
NODAT(76=I)=TOAT (17) -SHIFT(TT,12) 
TOAT(15)=TI 

TANA-G 

OO 100 L=1,272 

IF (NODAT(72-I) «LT. GOGO) TANA=TS3 207) 
CONTINUE 

RETURN 

EN 


PY OS" AM S3IOABA 


- 


FUNCTION YS4TFTCT, 9) 
COMMON /K/K(AC) 

FF £2 okfs 3) GOTO 16 
ISHIFT=S4TFT (Lyd) 


RETUQN 
ISHIFT=S4ATFY (L,I) 2 OND. Ktb7 4d) 
PFTUPN 
ENN 
APMP-fl- & - 
124 


99 


CAS 14/75 


PAGE 


99 


74h 
Th7 
yA 
349 
750 
351 
352 
383 


Pay Shwe oe 


P°9G7AM S3OMAS CE /14/78 CAGE 


POOG?7AM SZOMASZC3ZFILE,CFILE,-MFLE,YFILE, OUTPUT, 
+TAPFL=BFILE, TAPE 2= FILE, TAP U=EMELEF, TAPER=YFILE, 
+TAPER=OUTPUT) 

has SERFS REREEREERSKEEEER EERE SRE EELA SESE EEE TES SEER SESE EEE ERY 
pe ere 

o. “2325 PROS24™M. Fe. 49LEMAN. AST ALTI2ATION 29 NOV 7E 

o £975 FQ0M S29MAD 25 JUL 76. 

a eee 

Neeery 

m IfT1 COUNTS MASTER FRAMES READ 

5 IST3 COUNTS SECONIS IF DATA P2OCESSEN, 

ceaees 

se eee * 

> 22OGRAM REQITRES 56306 TM STORAGS FOR _IAXING. 

TeeeEe 

TERRE SEHR SERRE EER ESE EERE ERE ESE SHES EREE EEE ET 4 SPRRESEREREHERE EEE 

DIMENSION FHENCZC0C) s THEVO ZO), TVATC 20, 26) pTANACE1), 
t+JATTO105159, IDAC7) ,LABL(Z),TATT( 20,7) 

EQUIVALEYZE(FHED,ITHE) 

EQUIVALEVT=Z(CTANA (5=),T9A) 

COMMON/USEXSNMAK, IT X2INT,IWHAT, ICIUNT ,NPRINT ,TECTI (5), 
#LV C5) pALFHAC5) yAET#® (5) SUBFIMCS) SWRINUMCS), 
#Z7INOTA,ZICALL 
COMMONS D_LOUTZ QLLV (5) ,MELTLV CS) ,QLES TCS), NL TECT(S), 
tALFLYIX(S) y ALFL VV (5) ,ALFLV 205) 5 ALPHEC (5) gALOHE V5), 
#ALPH=Z(5) 

COMMON/0 JTALLZ PT sTADPT PN gD? ySTyCT > oMJ 
COMMON /TIMERS/ JTCR)D TT CAD 

COMMON/T OSGEDG/OMEGA , THETA gXTOTAg 2NM, KLT gXLUgAL Ty XLT, 
+*XLG™M 

HATA EDAE £32970 


a 
, 


seeevs 
& INITIALIZE FILES AND 9M3 CONSTANTS 
peers 


an 
’ 


MAS KA=7777777777777779 
IBTT=DATICAITT) 
ITIM=TIME CAT IM) 
TG=SFECONI( 222) 
GALL FOOMST (141i 4X, FS F-7 PROCESSING ROEGUY FOR SZOMA* 5 X,410, 

#5X,AiC) 

MNEMOESLIFTLE 

REWIND? 

REWIND2 

REWINNDS 

REWINDS 

IPP INT=0 

IWHAT=2 

ICOUNT=235 

NPP INT=3)9 


APreR= 6 156 


125 


grenereperresens sro oe oe 


_— 


=205°a8M S3OMAB 06/14/74 


IcT?-9 
eyere 


INITIALTZE ISS? CONSTANTS 


eeeee 


«Pe 49 0D 


NMAX- 5 
NO 1. LTE Ly NMAX 
LVCIF)=4 

IECT( IID: 3 
WRONUMCIL) =1.6 
CONTINUE 
SUSFI4 (1D =SISFOM( T= 
SUBFIM( 2) =SIBFQ4 (4) =5 
SURFEM(5) =-7, 

ALPHA (1) =AL2HA(2) 2179.67 
ALPHA (3) =AL9HA(4)=259, 89 
ALPHA(5)= 35942 
BETACL) =3° 7962) 2.95 
HETAC3)=35TA (G)= 6) 
BETACS)=0 61% 


te 
oO 


3. 
° 


uesrwe 
SHFECK EM DESK FIME CONSTANTS. 


2EAN TAPE FILLE HFADE? SPECOPN. 
seers 


oe eee ee ee ee 


IFGA-0 
73 CONTINUE 
TCTi=9 
ICT2-3 
ILN=° 
TPG=" 
LOAL..=1 
READO1) INS, IGG, (74D VT Dy T2459 IMCD 
TE(FOS{1)) 105590 
ne GONTENUE 
ICT3=¢ 
WRT T= (sy2341) ADTY, ATIM 
FNCOVE CSI, 4SIGL» LAL) CTHEDNT) y Tat, 3t, TAEV(5) 
Lt FORMAT (24,234 7Xy ALC 91K 5 AS? 
= FORMAT (141) 
TMA=", 
IFGA=9 
CALL OM3(KAZ92XT,KT 927) 
ICALL=TGALLE4 
IT(7)=6 
IF(KS302T.F201) GI TO 140 
CALL TUAT UCI Ty TM 9,4 ON,ZHP, ID, 08) 
TMA=T “Qa 
WRIT! Coy 2U14) CTTCT), Taft, &) 
WEITE (Hy 2514) CITKL) yIa15 6) 


APP-B- 6 =101 


126 


OAG? 


101 


AS ARENT TS 


22752AM $3903 C6/14/73 PAGE 492 


2014 FORMAT(SX,* EM TE*FS*,S5I5,7R8,7109F%) 112 

ye eee 113 

c  SHECK TAPE TIME CONSTANTS 114 

at eeee pa he 

OMT 1=FLIAT(LHO9( 139) 71000. L164 

TRAT=FLOAT(THED( 139) 7FLOAT(CHED(20)) 71206. 117 

GMT 7=GMTL==_OATC TAD D179) 8TPAT 118 

IF CINEN(30)eNEeSLAIFTLE) STO? 11° 

THEDC3CD=SLIFIL= 120 

CALL TIATICIT, TMA, MON, FHEDCZ7) gp THE 26% 4113) 124 

‘ HOL="HEV( 6) 43600. 12? 

HO2=FHEN(1 3) /3609. 123 

WRIT (4,2515) (ITC), T=15 6) 124 

WRIT? (6, 2015) (TTCT),T=4y 4) 425 

CLLR FORMAT(SX,*TAPE TIMES#,S5I5y1 By Tidy 1%) 176 

£021 FORMAT (1 41,7A1Dy FLO. Fy 20 ty SX ALO) 1?7 

7¢ CONTYNUE 1?P 

Se eeee 42a 

> 2FAN MASTER FRAME 136 

Ti Eeoe 13141 

REAN(1) IW, TGC, (CT OAT (Ly dy T= 1,IT WC). Je 1, TSC) 12? 

TFCFOE(1)) 105,30 122 

4 CONTINUE 1346 

PEANLL) IWCMyIGIA, CCTATTCIyd) yy L=ty Tt TMi gs=tyTGCA) 135 

IWCF=IWCA 176 
: TGC3=ISGCA :t7 
TCT 4+ ICT1¢4 1 28 
IFCITTLeVE.t) 69 19 50 £39 
ICT 4: 146 
IFCTATT (194) el Tote =F) TATTO1, Ld=EMAT (1. 4) 14s 
HQ= (GMT ZE=LIATC(LTATY (151)) ¥T2ATI/3460°.~ 14? 

CALL TOAT SLIT TMM, MON, HR, IH 1026) 511 2) 143 
; KAGOPT=KT3II2T=A9 144 
CALL OM3(KA3N2®T,KT30PT) 14S 
IF(KABORT.*EVe1) GI TI 118 146 

IF (KT 902 .E261) GI TO 29 1u7 

; ICALL=ICALLe1 L&R 
CALL GEIGAC(TMCO) 149 
FHED(9)=4LT 15¢ 

FHE9( 11) =XLT 1542 

FHEO(21)=XIITA 152 

FHEQ? 22) =9M=GA 153 

FHEM(23)=T4iTA LE& 

FHEM (24) =XL5 is 

' WAT T= 02) INS, JIGS y (HENCE) I= 15 UNC) 1Sb 

; PCy tet 167 

; +3 CONTINUE 158 
ee. Iti=? 169 

: nr gens 160 

t 3 OSTERMINE ATTITUNES 144 

7s eeee 16? 


AMP=f- A =102 


127 | 


PT ISPAM S39MAX CS/14775 PAG: 103 


09 140 IY=1,1G6S 163 
99 440 JsJ=1,12 LAG 
JATT( SI, TID =06 145 
143 CONTENUE 166 
HO= (SMT7OFLIATCIOAT (4, 1T) eANDeMASK3) FTIATIS 300. 167 
TF CH? LT e421 09% 4%. GTLHRZ) 30 TO 13) 148 
CALL TIATSIC(LT Te T4e4 MHP eT HED (26) 4113) 149 
KARO THKTI9N2T=9 175 

CALL OM®iKA3I02T,KT (ORT) 17% . 
TE(KABOQTLEX.1) GI TH 110 17? 
IFCKT302F.£9-.1) GI TI 130 173 
| TI1=TT141 174 
ICALL=ICILLE1 17S 
TECIT LEY. 1) SALL SEOGACTM) 176 
NO QO, JItL 495 177 
JIS2=7* 53 178 
JJ1=)II2=% 179 
JATTC Sdty TLV =2PLLvC $5) #20* 103 2405 20 
JATTCJIJ2¢ TTI =VE_LT_V CJS) FROVIC Gee 181 
23 CONTINUE 182 
133. CONTENUF 18% 
TF CITA LE. cd GD TY 166 Lag 
yeeere LaF 
> SETUP ANN PZINT ONT =24EMERIS INFORMATION 126 
7~Seeve 187 
TF CMI OCIS iy Gd NEAT) SN TO 158 19° 
TLN=TLNeOL 189 
IFOMINCTUEN, 3 OD eNEL4) GO TO 40 19° 
TEG=TPSeL 191 
WETTH (8, 2931) HO,4YON,ANTT ,T9G 192 
WRIT” (897004) LAS» CME GA, XIITA 192 
7056 FOOMAT(SX,*#IQ4IT TV = *,3A15,10X, "SATELLITE OT.* 194 
+#* ASCENSION = *%,71°.3,% INSLINATION = *,F19.3) 195 
PGVL FOOMAT (142 //5%,8 57-3 CPHEMERUS FORE, =A eb, 194 
#1XyNtCy7%y*>SOMOSTI> WN OF gil, 7X, FP AGS NOW *y TG) 197 
WRIT? (8,256?) 149A 
7097 FURMAT(/T 20, FiIEIG=UVTRIC% gy TE? yp ®GENQMASNETIC#S 199 
HLCM yt TIME HP PT, ELAT# TG yFLONGFT 39, FAL TE TUR, 26t 
42 THES A™ TSF, FL ATY#, T3539 FL ONY 177, #2 (KDE 201 
-0 CONTEMYE 292 
QK M=2NM¥1.55 325 293 
WET TS (847053) IT 3d, IT CGD gIT CSD gKLT, XLGgALT, THETA, 204 
#XL TMs XLS, 20M 295 
PEG FROMATE7X, 129213, = Fe Sg F 10 ode FV eT SKL Ce?) te 
152 CONTTNUE 207 
TY2=10" 135 OA 
ss mye e 209 
> WRITS MASTE2 CAME QUTOUT aie 
Be Cees eit 
TOA (1 EAL TOSS 212 
TOA C2PELIC OP XLT OS 213 


APM=fie 6 =173 


128 


9295274M S32CMA3 GA14/73 POG= 104 
IMA (3P=1900*XLG+ 25 2th 
TOA (4) =1909 A THET ACLS 245 
TNA (5) =100.* OMEGO+.S 216 
IMA (6) =190 of XLT4A.® 217 
INA(7V=13C-*XLGM+.5 z15 
DO 53 IT=157 219 
ITFCIMACIT) oi To0) LIALIIV=IAAC TI) + 36I)50 26 
FE GONTINUF 221 
CALL AUTIS(L ANA, TATT (244) gL 20, KO, dD YD 222 
CALL AUTSIILANA,TATT (252) 91 yKCDy JT) 223 
IWC O= MAXI ((IWCA=2), JOD) #2 224 
CALL S2PCS(TATT (252) ,JATT gIT 2) 228 
ICD=CIT2-1)7 341 276 
IF(ITO.LT.39) ICVEPCIF 227 
IWC G=MING (139,32) ZR 
IWCS=MAXCCINCSyIWS 4%) 229 
IGCA=(ICV-1) 73042 23¢ 
IF (MOD(ICI,T WCB) «= 9.0) EGCR= TGCR+L 231 
TATT( IWC 3, 1) =1944<? ZECOPN 232 
TATT(IWO%,I1SCIV=1I 4ATT PEED 233 
165 CONTINUE 23% 
KTRO2T=3 235 
IcT2=1CT 2¢1 236 
WRITE C2) IWo yp IGT g( CI VATCI pu) yp LatyIWt) ,y s=1,T60) 237 
WRITE (2) IWS 3gITSC¥s CCLATT CT, I) gp Tete % NOM, J=1y TGC) 238 
GQ T) 20 239 
12 CONTT NUE 249 
WRITE (3,201)) ICALL 241 
IFGA=4 24? 
469 CONTINUE 243 
sy eere 2744 
& EM OF FILE PROCESSTNG 245 
Teeeee 2uG 
IFGO=EFSA¢1 247 
IFCIFGA.NVE.t) GOT? 126 248 
ENDFTLE2 240 
CALL CONYES(6) 260 
WOTT=(8,7063) TOTL, 1COT2 254 
WRIT! (5,2093) IST, ICT? 252 
129 CONTINUE 283 
IF(IFGAL.T.3) GI TY 70 ?5u 
WRITS (842093) 255 
WRITS (6, 2003) 256 
2604 FORMAT(2K,#=ND JF FILE ON S7OMAM, 267 
#/791X,I5* FILES P24 FROM ES ITLE*/,1¢,15* FILES WRITTEN TO SFIYLE*) 
TIT=SECINI(7272) =) 759 
WRITE (6, 2909) THT 260 
WRITE (6,2063) TTT 261 
CALL DISSON(6) 2? 
27609 FNPMAT(2K,*TOTAL 220CFESSING TIME FOR S7OMA TS*4F1G.7) 26% 
G17 FOOMAT(2X%,*JOB TS “FING ABO2ZTED SY CARIRT AFTER CALL NCo*,TS) 


hOMAR. 6 


-104% 


F?0G2RM S3°MA5 CE414778 PAGE 105 


APP-P- 6 9-105 


ooo 


2°95°28M S39MA3 GA/14/72 PAGE 106 


SURRIUTINE 9M3 (KARIET,KTAOPT) 2346 

c 267 
Qh SER BER RARER BEE EERE ERED BRERSKEHESEEERERC EEC MERE AMERERHREEERBE 2na 
oa 249 
~ 4875 SU32QNGIAM4. =. HOLEMAN, LAST \_T=RATTON 2a JIL 7A 27t 
> 1975 33-2 JATA REXINTION SYSTEM, FRI YC VERSION 76274 274 
= (675 £5 9t5 Fs 272 
* 27% 
% MAIN SUBROUTINE OF OUTPUT MCNULE VEPSTON 746914 274 
a & > MODIFICATION VERSION 74276 275 
‘ E> MOILTFICATION VESSIIN 75245 27h 
- 277 
SECC R ECE EECKEEKERE SEE EEE CHERRY ER TERR ERE UES BERT EEEEH EEE REE 27R 
r 279 
REAL IdTA,4U PKG 
DIMENSION LV(5) gTECT (5), NTO5), 2.4 

* SNUCL Gy 7) pCPHI (155 3D 9 COST (15 93), ree 

. T24 CZ), TI2C3Dy TONUC 3D, TTA 8) y TOME C3) yg Dez 

. SURE IM(5) eWRDNUM(S) gALPHI (53 pIETACED, aru 

» ALPEHL (5) 9X2 (5) V2 (5) 4 7P (5) 9 NIMC ED 24S 
MIMENSION WNGEC3) 246 


DIMENSTON SECC3OD, XCC3GV, VO’ 35) 70632), OXOK FO) OVC! 30) 970 (37! 
DIMENSTON TLIMIT (75) ,0ENOM(7C) gFACTIPEC Od 20 CTC) FRIGC30) RNC C9), 


CAC( 7H) ,S8£9039),575( 30) pHXYO( 39), THETIC ( 79) Pay 
NDIMENSSION OYVEGA0(30),99MEGC( 39) 244 
PEAL TOTS9 (36) 291 
COMMON/TIME2S/ITIYV-E,ITIMEU 2352 
COMMON, JSEX /SNMAX, TOQRINT sTAHAT,ICIINT, NPPTNTI,ZIECT, 24R 

#LV,yA_PHA,SET AySIB= POMyWRONUM, XTOTA,ZISALL 24k 
GOMMON /TOIGEONGS O4M= Gy THET gKTOT p22, AKT, AXLG yNALT, XLTMy XL GM 
DIMENSION JTIMEUCID, JTIMFF (CA), JTIA-PCA) 2% 
COMMONSOITALLZPL sTHOPT ON >, STyCTy> MI e47 
COMMUN/SPIN/ OMESAS 238 
COMMONS OANATN/X 254 79779 XDZyVYNZy79Z,Y= Ne FAC PV ag RNG A, TOT AG HX, 

C OME GA7,OMESNT, 27 tres 
COMMONS OUTIITS KgVo 7gKD9VNGZ7N GF, THES S athe | 
COMMCN/OUTNAT/EPF SL SNy ITEP AN 3°? 
COMMONS OITIL ASP, O2_ SSoOlSy ST4 ST yQ2NUy DYE Ng PHI yESTC, FP4D My OST, J 
COMMIN/JDLIUTSALU VOT) pDELILVIS) pRLECE (5) gILTFCT (5), 304 
#e ALFLVX(5) ,A_LFLVYCS),OLFLVZ(5), 76 
. ALP HE XK(5) ,A_PHE VIS) ,SLEHE7 (5) 3°6 
DATA TOFF/59./ St? 
NALFA = jee 708 
J7 = 4 raq 
KTBO?T=9 Fi¢ 
ICTEM=0 De! 
IFCICALL.NE. 1) 50 79 S1 312 
90 41¢€ Il=i,8 eh es 
JTIMFE (IC) =3 3414 
JTIM- UCIT) =9 215 
JTIM= OCIS) =3 226 


APOe Re BR HTK 


> 


23578M S35MAB GS/14/735 


CONTENUE 


Z™PO FRFOR SINTROL SINSTANTS« 


2° Sey @ 


+36 


we > PRP RP OD 


KARAT=5O5 

LART=699 

KTCHMT=0 

FPSLAN = .399C09CC01 
ITEPIN = 25 

PRINT 194% 

‘G4 FORMS T(2u410UTPFUT MOVLE = 943) 
PT= 3, 146153255358973 
TWOPT = 2,¥%?T 
RN = 160.7?! 

Ne = PT#i8c. 

AC>iMUsteC7645C000C0000.C. 
C=6676.11 95 


MU=S1. 407645216 
R= AD ALL DATA P= NYUTREN FIR THE OFTPIT MONULE. 
WI TAT Ue cs 
IN72UT OATA SJFFLTEN Se EXPERIMENT E Dee 


NMAX = NJMR=IQ GF EXPERIMENF=R WORNS FER WHITH BTTTTUNE 


O2 FSHERE CIS TS SEQSTAIO 


LWT) £ IF LOCAL-VERTICA. ATTITUDE FOR WIRD T IS 


S= QUIRED, 
: ITHERWIS:. 


Tea ECE 1 TF FCI ATTITUDT FOR WORT T IS FEQUTPEN, 


c OTHERWISE. 
TORINT = FOINTOUT -SEQUFNCE CONTOOL 
“2 VEVER 
6 ZT VF RY NPZTNTH CALL 
i CVERY CAL. 


IW4AT = TONTROL FIO OILEF TON TOSTNES AND702 


27T. ASSENSION ANO VECLINATION OUTPUT 
={ = fe COS ONLY 


27 = .AYD4 ANN NELTA ONLY 


= ? = ANANTH 
SUIFOMCTY = TVENTIF IER 
#029 T. 


34) 


4K? 


$43 


745 
746 
47 
34R 
ThG 
56 
351 
352 
353 
354 


NF SIJBFRAME IN MAIN FRAME FOH2 


256 


W2YINIMCT) = LTNENTIFIFR OF W327 NUMBER IT IN SUPFRAME, 


ALOHA (T) = FIPST FILER ANGLE JEFINING ATTITUDE OF 
SATELLITE 


=XPERIMENTERFS ZAQTH SENSO® W.2.T, 
39NY AX=S. 
3ETAC IY - SECOND =ULER ANE. 
TNPUT NATTA = OOM FSTIMATION MOVIL <- 
NONY 
W524 
Wa" ST 
ONS 
C°4T 


SYEFFICTENTS CF CURVE FIT FOR NU. 
SIFFFICTENTS OF Cur/E FIT FOR PHIM. 


APP =-R- & -107 


WIMBER OF SOFFFICIZNTS FOR NURVE FIT OF NU 
NIMBER OF SOEFFICIZNTS ©O2 CURVE FIT OF PHIM, 
NIMGE2 OF SOEEFICIZ NTS FOO CURVE ZIT OF PST, 


250 
344 
352 


358 
67 


p 


PCV LPL LI 


Q3 


oe ed 


SIs2 we 
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S757 +s SOEFFICIENTS CF Curve FIT FCR PSIM. 26a 
QNIAVG = AVERACE OF ALL VALJET IF NU, 7AQ 
TVAVG = &VERAGE OF ALL TI4~S THAT HORIZ70N SENSOR 

LINE CF STGHT TS 1_ONG VERTICAL. 379 

J4Y=GAS = AVERAGE SFIN PATE aT 

TZ = TIME AT WHICH INIFTAL FMOEHFERIS IATA APP_LI=S 

774 

PRINT 1049 775 
102° FORMAT(//14 ,2949D8TA SUPFLI=D RY FX? >RIMENTER S/) 776 
Ca a 

RZ AD THE EXPERI MENTES*S VATA. 278 

379 

POTNT 1226, (CJTEME I(T)» T=1455) 73Lr 

L227 FORMAT 1K, GAVEAR oT 5 GX y SHOVAM pT GX ge AHMIRy T3y4X pGHMINUTE pT 25 4 Xe 
CF 74SESONDS y 117) ZRZ 
TAS“ LREANIS 91290) “WMAX, ITPSTINT, TWHil 283 
2232 FORMAT(3E 2) TAL 
IFC TPRINT. GT .9) N®P2INTHLORINT 735 
EATS = 8 326 

OG £2 T= Se NAY ZR7 

13° TREADCS 91910) LVCI)» TFTICID,y SIAFIMCT) » WRONUM(T), ZARB 
1Cs* ALPHA( TD, EF TACT) 7AaG 
pak | FORMAT (212, 6X4=15.9 296 
TATTY = LATFO * TA=S(LVCI)) © FASS CEE ECTY) zat 
PRINT 15%C, LV(T), TECTCIT), SUBFRIM(ET), WRANUM CTD, eA2 
FALPHA(T) ’ BETACT) 79% 
T5CL FORMAT (1X, SALV » Iiy 2X,4HECT e ids £5%5 334 
2X, 7HSUAFIM 9 F4LCy 3Xy7HW? NGM » F520, 3X yAHA_LOHA 

‘ F7.35 3X,543=TA 9 =7.3) 346 

797 


COWSEST =O FH LOCATION OF THE 19RD TN THE DATA FRAMES 


_“ 
xe} 
D 


OTCID = CESISFRYAT IV H1LeF R25 + CARONIIMC TD 10) Fo4FAR281 2EVS109C 


135 GONTINUE uct 
KS? 

SPRSSCECEESEEESECE FEE ESEES SREY SESEEREK TE” FER %Q3 

P=AD THE ESTIMATION “OOULE CATA. 4 Ou 

THIS IN®IT BLOCK PINCHED FRIM THe ©&.4%. PROGRAM &5S 

PTAD FN THE FI4*MERINES 5OQM EM +05 

4697 

POINT 113 GOR 

11% FAOMAT(///14K »3G4NK8T A SUPPLT= 0 BY FSTTMATION MOLULE/Z/) &93 

KARNSO = 1 Gil 

39 CONTINUE 412 
REAN(4,15C1) AN” 413 

1CJi FORMAT( 434810) 414 
L120 FORMAT (5K 5 To bX 9135 9K pT Ay 11% yD 2p 1 0X, 12, 21Xy 77) &15 
IFCEDF(4)) 565553 416 

n€ CONTINUE 417 
NECNIE(9354501,4905%) KAPRTN 418 


APPw2. & H-40R 


133 


22950 AM SBOMAG 3© 414/734 PAGE 109 


20294 FOPMGT(78%,f2) 419 
ICTEM=IST Oo Me 1 &26 
TFCIC©TEM.GT, 59) 33 19 FFO 424 
IF(KAQIN.VF.1) SO FN 56 422 
VECOVECSO,1LG5,ADUAD CITIMEDC TD, Tet, +) pNVECT,KARON 423 
ICTF¥Y=2 42u 
JTIMEE (SP 24 475 
JTIMTE (5) =9 426 
PRINT 1223, (ITEM=O (CT) T= 1,5) 427 
CALL TIATS(ITIMFE, TIMM,MON,H!, UNG LAD 4 2A 
JTIMUCA) = UT IMEZ (CL) 429 
JTIME UC 2) = ST IMEE (2) 435 
JTIME UCT) = JT TIMED (2) &34 
JTIM™U(4) SIT IMES 64) 4 32 
| JTIMEU(S) SUT IMEE (5) 4 33 
JSTIME UCHR) = IT IMEE (5) 4 TG 
JTIMU(7)= TIMES (7) 4 te 
; JTTM UCB) = IT IME= (8) =0 4 36 
DA 22 JS = 2,NVEGT 427 
KAPDSQ = KA2NSIT +: +8 
READ by lL1L9) SESCIID XC IID» VECISD 72095) yKACDD 439 
TFLKAPNS? .VF,. KA23N) ON TO 669 BUC 
a KAROASQ = KAZNSE & 1f GUY 
PEANMG,L12U) WEE IIS VVIC Sd 4 WZO( SID» KAPIN 44? 
4 IF(KA2NSD VE. <423N) GO TO €69 442 
PRINT S135 FECCIS) + XGL II) VICI ZI ID but. 
PRINT 515, KCC ISD» WC (SI), 376 (9S? 445 
12 FORPMAT(4S4 SECLFEL 2A GY X%,717—6, 4H 971756 gH 2,5F 17.6) 
i as FORMAT ( 17% 94H XMg=- 1709, 4H V¥_=17 0% 94H Z9,F17.9) 
TL1L° FRIAMAT GX FL Be hy Ke E1666, Uy EL Oeby 4X9 Fl 6,651% 9 12) 448 
| $42: FORMAT PAX SFLA Dy Gey F 16099 Gly ©1669, 1X y TP) 449 
24 CONTYNUF 45C 
‘ KAPNSQ = KAIIS) + $ St 
PEAN(G,1125) TLFOST,TTLAST,<ARON 452 
IF(KIRNS) .VE. <429N) SO TC 660 453 
L124 FOQOMAT( 23K 471355 97% oF 13 e6929Xy 12) 454 
3 455 
“ 456 
: n QETFOMINE O2HTTAL PARAMETEFS FCR EAS 4 STAT® VECTOR 457 
{ 5 458 
i FOINS L041 45% 
j NO F°0 SSE NVEST LAS 
| 


CALL OPAT CXC CIID yh. CIS) gp ZECIS) gAXOCI ID WO CISD NZL (IID PDENIMS JD, 
CFACTIR (II) s2POCIID s 2VGCIIDD og PNG CIS) gp AVC IID STC CISD eo CTI IID» 46? 
STATA CIID ARVO CS dD THE TAS CIID y CMEG AIC SID, DOMEGC(C ISD yp IIZSEC( 199) 


295) TONTTNUS 4 ble 
‘: 4 65 
s COMOSTE 7242 4ERTS 7ONF BOUNIARTES 4A6 
NMTNIS = NVEST © 1 467 
TFCNVEST «£26 1) 33% 79 ECF 4 6A 
NO 670 Ts = 1,NMINIS 4&9 
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Poe oe 
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VETMETAISD = eS" CSESCE SY + SECC Jet) 
PRINT 5435 ITJ,TLIMET(IS) 

CONTINUS 

TLIMEITINVEST) = TTLAST 

KNDX = ¢ 

FORMET(LIX,7HTLIMTT (yD 2_,%H) =yE21-9) 


KAPTSY = KA2NSN + 1 

REAN(4,333) ICyNOS, IND, TIM! , TIM2, KI NN 

IF (KAQPNS NE. KAPAN) GO T? 666 

AO 6f Tei ,Noc 

FE MOY iE We LY GOS Ter 

KARDSO = KA2NSN + ft 

PEAM (4,305) LTIT,s sig KKK, TIM1, TE42, CAP ON 

IF (KARDS?) «NEe KA2SONy GO T? 660 

TRI(T) EM 

ER@CLY = FE4e 

PANG: (LT) = FTIM2 = FIML 

KAP OSO = KAROSO + ft 

PEA (6,294) TRVUCT) sT TVA CT)» TOME (IT), KAPIN 

IF (ARIST «NEw <A20N) GO TS 660 

JH i) 

JL JH #4 

JH SH © 3 

IF C#U<67 LIRR) GD TI 63 

KARNSO = KAPNSQO + 1 

REAN (45362) (ONICIS, 1) JZ JL y JH) KARIN 

IF (KARISQ NE. KAZNNI GO TY 5460 

Cie) a 

JH 

JL 

JH 

EF -CibcSVebIRD) sO To 65 

KARDNSQ = KA2TSQO + 1 

REAM (45392) (GIHT(SyT), JEIL» JH) yKIO9"™ 
(CARDS «NE. KAPOND GO TD SEC 


CL eSF.IDRO) 359 TD 47 
KAR OSQ = KAR9SQO ¢ + 
READ (4,982) (COST CS,T 0, JE IL y JH) gKI2N" 
IF (€ARIST eNEo KASPOND GO TD 666 
GO T9 65 
CONTE NUE 
CONTINUE 
KAROSQ = KARNSQ #& tf 
PEADN( 4,395) ETALI,= TA2N,KARIN 


RP Pek= 6 =216 


2-AGEAM S294A3 o6/14/73 PAG: lll 


IFCK2 ANN ANF. KAQITU) GO TO 650 Ses 
ROT FARMAT (SX, Thy Xp Tip AX pT 25 SK Fi berg SX yg Fi be Ag LAX gl? e232? 
j BJS FOPMATC RC HL 7 elle Ste FL olla =X eg Fl17e1) 01 4X, T2) 57% 
a2 FOPMAT(CAX yy T17old gery L7elQy- X_g E1701) 93% gT2) EOL 
G5 FNOMAT 7K FL S054 8M HL 2.55 SAK, TS) $25 
i CALL DFSA2CTNUGIF4T. CPSTeNOC, TORO) S77 
i a ga 
{ f SPREE ESE CERT EEEE. CTEM ER TUE CORRE EER RET ER 329 
£0 TY 39 S36 
36°. CONTINUE 3% 
WOTTS (6,549) KA2959, KARDON 532 

53° FORMAT (214 SEQUENT = ERRAND, TAROZI3,17H CONTAINED NIMSER,I3/) 
7 KASOPTH1 Ry 
PFTUIN 535 
3° CONTINUE 536 
Bi FINO T4& SINES ANT COSIN=S OF THE INVARTANT ANGLE ETA. > 7 
EFA = ETAL © DR GRA 
{ FIRG = ETRSY Y FR 639 
SEe 2° “SENG 42} 54cr 
CEE = SIS(ETA?2) Gud 
SE = -SINCETA) 542 
CE = CaNE2 PA) Su? 
> Bau 

PT RFOIM THE FRELIMINARY TRANSFORAATYIONS CCRRESPONDING T) 

THE INVAZQTIANT A*GLES ALPHA, SETA, ANN ETA 546 
3 Sa? 
NN bo LT = ty N“AX 548 
ALPHE (IT) = ALPHA(T) + DALFG 549 
CA = COSTAL PHE CTY *® 3%) 556 
Sh = SINCALP ALCL) 92) 551 
GA = COSCIs TAC EP EVO} 552 
SB = SINGH POGEVE YS) 653 
XPOTP = GA*Zae ose = SECYUSEY SATGH € 26" $3) 556 
YPOCT) = (SS*SA*O5 © CEYSEIR*SES * Cae 2h PSee S39 
7OCVN = =SOKSASTH & SEFSE 556 
%° CONTINUE E57 
‘a N®2P FS NUMBER DE PF INT OLOTKS PES PASE 55a 
oe 55a 
- TF PPINTIYT IS VOT NESTPEN, SKIP THtS SECTION 54&C 
KRERCM = OG SAL 
TREXYPORING wits. S) =F TO GSE 5h2 
KEO0?7 = 9 56? 
NO €51 KC = LeNMAXK 5 at 
KCON27 = KZJORE # TEST (KK) & LV(KK) Fas 
"54 CONTYNUE S6a 
TRCRGOORY «fads SCF +0 TO 655 567 
\ KWHAT = } 5AR 
LFCTWHAT 22)6 39 <NHAT = 2 5469 
| KAE NOM = KCIDALKAYAT + NMAY @ 3 575 
| 653 CONTINUE &71 
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* FOP POSITION S72 

KODENSM = KIJENOM # 3 G72 

N3P = 5S4/KIZNOM 57h 

TFONIP 669. G) VE = 1 575 
639 CONTINUE 5 7 
NBEN2P 377 

RETUON = 7R 

51 CONTINUE 579 

TERRE RRR HER EH HERE REE REE ERE RE EE SHU SERRE CR SERERREEEREKRCK ERE 5ac 

Ce See eaq 

> NOEMAL SNT2¥ PIINT Td SU9P2ANGPAM, 54> 

Q? Bare Saz 

RRR R RR ER EERE ERE EE RHEE RET EERE EERE EERE RE REM ES SSRERHLSREEKRE KERR Say 

; S = FLOATCSTIMEUC7) = STIMET (7) Sat 
: c + FLIATCITIMEU (A) = JTIMEZ (HDD LOC GCO0. 53 
TFC CT LERSTHSV*ECSH=TTLASTI) S552,5? ca? 
53 CONTYNUE ERA 

| PRINT 1304, TLE 2ST, S,TILAST 599 
' 134 FORMAT(1, 3520044) 590 
| TF (KSOUNT «LT .20) 22INT 1514C, TCALL ca4 
L542 FOOMAT(G24 TIME JO CALL OUTST IE 2AN3> QF ESTIMATE 4119) 4? 

KCOUNT=K79UNT #4 ror 

KTHO2ZT=1 594 

TF CKTOUNT. G2 eKAAT) GD TO 555 nae 

RETUPN 596 

5z CONTFNUE Sa? 

- =9A 

TFUNVZEST sEQe 1) 59 TO 635 5.4 
| 00 625 IJ = 1yNMTVGS AAC 
IFCCS = TLIMT(II)) F2O,530,F25 acy 

Reo CONTINUE §n?2 

‘35 Ty = NVEST A.2 
®3C CONTINUE a 


nn 
> 
7 


IFCKNOX .£Q. TJ) 5% TO 640 
THETGO = THETAD(TS) 

XZ = KOCE J) 

v2. = VOChS 


wuoyip vt g 
4 te 3 
bo oJ 


72 Zo(t Js) 
KOZ = Ox2CTS) 1c 
YOZ = WOT) 11 
702 = N2G(T9) 51? 
DFN = DFNOM(TY) 613 
i FAC + FASTOR(IY) 514% 
; Qv = RVICTUD 415 
| RN = QNO(TI) ALA 
A= AQ(TS) 317 
SI = STO(IS) 318 
CI = CLlocrus 419 
HXV¥ = 4x O(LJ) 52 
INTA=TOTAN(TY) 6?1 
OMEGA? = IMEGAG(IY) 5? 


AOP=A= 6 =112 
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OMEGIT = YOMEGCITI) 
RF = QUT Sd 

KNOX = TJ 

CONTT MUS 


START JF MAIN LOOP 


TOFL-S-SE70TY) 

OME CEAMEZAZEVAESNTETNEL 

OME G= OME GF?) 

CALL NWIMCTIELs <ASIRTD PF TURNS (38) 
THF T= THETAE IN 

XTOT=ATAV2(S1,0T) #29 

PR=o0 

cf e 


CORRETT THE TIM= FOR LOCATION IN 4ATN FRAME, 


TS = ATCH) & S 
bu? 
FIND THE TIME =20M THE IMITIAL TEMS OF EPHEMFRIS ACQUISITION. 
£45 
TMELT = TS - SED(TS) 646 
547 
UWIATS OMEGA, RGR 
540 
OMEGE = MEZA? + IMESOTETNE_T 656 
OMEGE) = IME GAO 554 
452 
CIMPUTS X2ES=NT VALUFS OF © PHEME? TS, Ag? 
54 
CALL NWINCTIELT, KA IRN) p PETSANS (38) ASF 
ASE 
UP>OAT= T4eTA Se? 
556 
THE TAQ = THETA¥29 359 
549 
TF4D oSTe “WAX 33 79 6 641 
A62 
I> NO ATTITUIJE TS QEQUIFFN, GO TY 170 563 
554 
IF(LS (J) # TESIC ID) 109, 1005 5 665 
466 
CONTINUE 567 
568 
ATTITIDE TS VEVITIED. FIND THE JALUE OF TIME FOR THE CIRVE FIT. 
570 
571 
jg? * 4 572 
TF SMOG EVL) ST 77 48 a7? 
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TE (US.ST.T21LC2) oANNTSoL EST O2(2)) 47 
IF (NOC.E2.2) G6) T) 58 
IF (TS.GT. T2103) ANN TS LEP 2(3)) J? 
CONTI NUF 
RNUAVG = T2VUCJ7) 
TVAVG = TTVA(J7) 
OMFGAS = TIMECI7) 
FIND 2414, OSIM, AND THE SFCIMAL PAPT AE NU 


TSS = TS = TvAVS 

CALL FITC PYLE MN, 2AN-E(S7) gCPAT (1957), TOPO, TSS) 
CALL FITC AISEMID,2ANZFE (I7),CPSI (1,57), TON, TSS) 
CALL FITCOEINY yy 2ANSEC IZ) gONI(C 1,57) ph DATS) 
PHIM = P4HIMD*FOR 

PSIM = PSIMOFOR 


ov a) * OF 


FYND NY TN REVILUTIONS. 


nwo 


ONU = IMTSAS © CTS- TVAVG) #7 TWOPT + 2UAVS + 0.5 
INU = QNI 

FINU = TNU 

RNURZV = QNJ = SINS = TECNU 

CONTINUES 

IF ( RNU2ZEV .GFe 1.6 ) RNIPSY QNU2=Y = 1.9 
ONN>=y # 1.6 


TF (€ RNUGEV el Ts. 0. 
TF © RNUCEV Gee 4 
FF ( PNUTEV «kT. 3 


FOND NY IN RAOTANSS 
RNU = RNUPEV FTW IPT 


FIEND NU IN OESS=EES 
RNUD=G = RNJPEVEI5". 


FOND 241M AND 2F5TM IN NFSREES FOR OUVTOUT 


COMPUTE TRIG FINCTIONS C= ANGLES £0? LAMDFL 

CTHFTA = CIS(TAHETA) 

CT = CTHETA 

STHFTA = SINCTHETA) 

ST = STHEITA 

CPHY™ S05 (PHIM) 

SPS." SIVCesSt™) 

SPHI™ SIv¢PHtT™) 

CPSIN [9S (PST) 


FOND 24T AND 257 TN LOCAL-=VEPTICAL TOOQNTNATES (2475 ANN 


APP=Fe & =114 
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725 
SS = SPSTMHST = S24T MESES CRS EM 7 26 
PSTO = ASIVGSS) 727 
CS = COSCPSED) 726 
TOP = ST®SPSIM & S>STMECTESAH TY 729 
30T = SP4IMESPSEM 730 
PREG = ATAN(TOR/ZAIF) 732 
TFECOVT) 10 4gh4e11 7%? 
PHIO = P41EoG ¢ PTI 7%3 
GO F? 13 736 
IFC TIP) 12413513 sities 
PHITC = 24EG # THIAE 736 
CONTE NUE 737 
SP = STN (PHEDD 738 
CPR = COSCPHTO) 739 
OHIO = 247F5 #99 749 
2STON = 2512 #29 741 
IF(U eof. NMAYD GY FD 200 742 
743 
FIND THE PESIT ASSENSTON ANG DECLENATION SF THE EXPER EMENTEPES 
SINSO2 IV FST ANDZOR LCCAL-WERTISAL COORTINATES, 745 
746 
CALL LAMIEL EXECS) VPC I) 5g ZOCS) gLVK I), FESEC UD) 747 
748 
1 74¢ 
7SE 
IT THIS [ES T4& =XFERIMENTE QS LAST ORD IN MAIN FRAME, PATNT 
OT T4F 2ESULTS = TF @FIUTRED 
TEC J eLEe NAAX) 59 TD 3 
S& =S 
69 T) 4 


SONTYNUE 


Sf TF THE FESULTS APE TY BE FREVTFEN 
IFC T®FR ING SOG, 306, 769 
IFC ITOUNT = NOSENT) 3259 356, 355 
ICOUNT = TOIUNT & | 
60 Ff 500 
ICOUNT = 4 


ONTEYT TS R2EVUIZFEY AT THES STEP 

NASN 44 

TF ON?.LE.NH2) GD TF 1 

ORTNE 1361 

N&éB = 1 

POTNE 1942 

PRINT 10% 2 

FOOMAT (1) 

JTIM=P(7) JTIMEIC7) 

JTIM= P08) JTIME ICA) 
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SFOYZSP AM SZIMDAA 


FRING 1045, 
*O4T FORMAT (LKIS4THETA 


«- -f 


PRINT 1050, 


415 CONTINUE 
N90 39 JJ=LyNMAX 
TECLV (IJV + TECT (CII) 
#FENITATIONGE® 


ALFLVK,ALEFLIY ZANT ALFEL YZ 
LICAL VERTICAL 


wae 


AZINUM( IS) 
SIIF RM CII) 


ONLY JYIRECTION 


GZ CONTENUE 


7 


PIT4 JIPZCTION TOSINES AND PT, 


ALFL VEC JID SALFLIV (JI) yg AL 


2LLV (JJ) #27 
JELTLV (ISP 20 
FRINY 1150, RLLVD, ILTLVD 


FOPMST(LOXsL OHLAMIE Ly 


IFC IFCT(SSDLE OD) 


CALL TIATICITIME Ve ETM MONS 425 J, 442) 
FLOATCSTTMEO(S)) 
CITTME> C5) y SZ 1y 40 4 SETGME 

THFT AD, OMEGAD Sy X49 Vy 79X09 V%92ZN,R 
oF 55.8% 5%s 
yELS0O gf Cy 


9615 e6y95XKy 
gEL> ey SX, 
9F1> eA 1X, 


37 TO 415 
PHIM, FHICO,RNUIES »PSIMI, P5129 
1X,L0HP4I4 


9 F156 y95Xy 


9ELZ «Aes 1h, 


9£15.26) 


30, 20 


AN) ALFHE7 AR= 
TROTH-CENTTPEN-CON2VINATES SYSTEM 


FORMAT(/1OX25HATTITUIE FOS WOPD NUM3=P 
IFCLV(JI)) 


TSOSYNES A2E OFSTQ=™) 
ALFLVX (JI) pALFLV YC JU) yg ALF LV 70S) 

FORMAT COXLTG4AL PHA KM LV ELGe4, TKICHA. OHA 
X IXL7HALPYA Z LV 


AQE T4e 


AS 


OR/14/74 


* FLCATCITTM-P(6))4109005". 


1S HOME GA 


19 H¥ 
1°H?7 
1cHYN 
10 He 


10 HPHTN 
10H°OSIM 


NTOCCTICN COSINES IN 
SOW VNINATE SYSTE™ 


THF NIRFCTION 


T3,13K OF SUGFOAME 


IN LY COORDS. 


Y LV F16.8, 


ANT NTECLIN.e 
V7(5J) 


gF15 eh gSky LOMVELTA LV 


re 
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116 


"6, 
”7 
~R 
7a 


NNN ™N 


0F£15.6,5%X. 
915 Hy hy 
9©§ 1509. 
9F£15 e048, Xs 
oF 15.67; 


TOS 
707 


SOSINES TN 


447 


WES TRENKLY 


aya 
42¢ 
ao? 
222 
§?3 
R26 
Rae 
Be 
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IFC TAHAT = >) Gay U7, GA 
CONTTNUE 
ONLY VIRECTION TOSTNES AE DFSIFEY - TN FST Coarens,. 
PRINT £1955 ALOHEK (JID yAL PH VC JS) 9 AL P4= 7059) 
FOPMAT(2K134ALP4AK SST E168, SKLOHAL HAY ECT F 16.8, 
TXL°HALCHAZ FCT T1668) 
oO TT 44 
CONTINUE S a 
R°TH ILRESTTON TCSTNES AND RT, AST. ANY SFCLIN, AVE BESTREN-ETT 
POTHT 11335 ALPHEK SID, AL OHS Y (CJD AL PHT IC) 235 
CONTINUE tT 
PLECTN = FLECT(IINEOD & Re 
RTECIN = ILTECT (CIID 29 839 
PRINT 114%, RLETII,ITECTN aye 
FORMAT (LOX ,LOHLAMIA TOT 9 £15 0% 9S5KglJ AN LTA HOY 4F15.5) fut 
CONTINUE RK? 
CONTE NUE R43 
GO T* 56] Sut 
TONTINUE aye 
KAINPT=4 3 uF 
IFCKSOUNT.LLT eLASTY PPINT 2074, KCQUNS , KABT 347 
IFOMIDCKDIINT ATC) FDC) PPINT 2901, KO %UNT, KARAT 84R 
FARMAT (2K, "COUNT TE g® KALT, TS) 4649 
CONTE NUE 456 
Jy = NMAX 254 
PETUIN 362 
END R5% 
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SUBRIUTINE AUTIS(T MAT, IMAT,SI WO, IWN, CIN) 
THREE SRE RE RE EEE EERE RE EEL TRE EER HEE OE EERE RE ORL EEE KL HEEL HEL ERED 


a 
1976 SUBPRISTAM, ©. 4OLFUAN, LAST VLT©REN 12 JUL 77. 
SPEATEN 9 M42 76. 
ee 
“Bare 
FIRST VERSTON JF AJTI-UNPACKIN, ROL 
i 
SESS SESE RREREEEEESEEE EET EERE EE HHL HES 
DIMENSION THAT (1), IMATCL) gKYAT (512) 
QOATA ISTL,IST2,«ST? s3*C/ 
ICTiI=ICT1¢t 
IWD=_BY TX (46 915, MAT (4)? 
NWPW=LSYTX (31,15, I5”"ATC1)) 
JwN=_ BYTX (15,15, UMA T(1)) 
KWO=LAYTC( 1,15, I4AO (19) 
IFC IMD LT et eO%eIWNI.GTe512) 30 TO &O 
TF CNWPW.NE C1 0.ANT.YWPW.NE 1.27) GO TD «Cf 
IF (KAN .ST 512092 .509.6T- Sie) GOTO +7 
TFC JWI EV. De MFC KWILE DL OY GN TD GN 
se eces 
> TENONE 4029 LOSIC 
pte ere 
M0 13 IT=s1, fw 
IMAT(II)D=9 
CONTITNLE 
LWO=4 
NCPW=60/NWPd 
DO 29 IT=1,fWN,Vwow 
LWO=L WNL 
ICH=41 
MWN=TTeNW We L 
960 2° JJ=II, MW) 
ICH=ICH-NTPA 
KMAT(JJD=L AV TX CIS4,NCPWgIMAT (CLWYD) D 
ane CONTINUE 
IFC LWOWNS. JHO) 3G TN 4A 
Severe 
> OECCHE DATA 
Pcl Tac 
TCH=- 
00 3 Il=1,Fwd 
IFCKMAT(ETT).EV.G) €O TO 3C 
NCOW: S#KMATCTI) 
ICH=FCH=NS PW 
IFC ITH LED) LWDHLWOF1 
IF (LWO.GT.KWO) 359 TO &C 
TFCISH.LE.9) IC4=51 -NOPW 
IMATCIIV=L3BVTXCTC4,NCPW,UMAT (LWD))D 
0 CONTE NUF 


FRI LIC LD 


(ESSERE EERELEEHE 


roy 
o 
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118 


954 
ede 
aa 
aG7 
ASB 
59 
°6¢ 
4A4 
262 
457 
@au 
ec 
2 BEF 
aa? 
BER 
ena 
479 
ays 
a7> 
a7vz 
47h 
a7c 
are, 
a77 
a7. 
a79 
58% 
aus 
RR 
naz 
3au 
Qac 
Mall a) 
qA7 
RAR 
RaG 
ROf 
34 
832 
Raz 
Raw 
th ye 
896 
aay 
BR 
#23 
a93 
ard 
3C2 
333 
34 


i i TN cc At lA 


PL 


229374M S39MA3 Caius 73 PAGE 119 
TF(LKOLLT.<WO) 39 79 EC ans 
ICvizc 306 
PETUZN 307 
22 CONTYNUT 393 
ICT2=TOT2¢1 970 
TFCITT 26. £610) ARTTE (6, 2001) IWO,NW24y JMD,KWI,LWD 310 
ICT 2: IST -I3T2 913 
IF CUTT2.4E.KOT2) L2T2=0 a 
KCT 2= UCT? 213 
>OUL FOOMAT(SX,*®2°93LE4 TN NECOPING AT#,35°S5) 2144 
IWO=-1 / ais 
RE TUN 216 
END 247 
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P2IGREAM S33LAC GE/14/73 PAGE 120 


PROGRAM FSGLACC(TFILE -NFILE,LFETLE=9," FTL E= 64, 


os 
+OUTPIYT=Aay TAPEL=CETLE, TAPES=OFILS,TIPEZ=LFILS, 1! 

+TAPE®=YFLTLS, TAPTS=9UTPUT) 1? 

aM SRP ESE HERE ESSERE SRE REECE REREEE ESE SEESERHEE EES EERE RERHE 1 z 

TEeROe 14 

> #1975 PROGZ24M, €. 49OLEMAN, LAST ALT? 2ATION 2 SFP 77 1s 

> FROM SZ3LAF 3) JUL 75. 1 

ee ee 17 

Sees 418 

t PROGPAM TO 499 8 AND L INFORRMATION FO? OATA FILE FROM 19 

> STOMA ar 

Ne BERS a4 

yebese 22 

> 3260093 tM STOQINGE 2=7ITREN FOP LOADING, 2% 

SO eEN SE ru 

FESR EREEHERER HERE REE ERE ER EEE REESE EERERRES ED SRE FSR EREERERE an 

DIMENSTON =. 024) 53= (21) ySLE21) pIOAT( 70,15) ,ITK U4), 26 
3 FFHENC 390, TAL VC SCD yg PTKAGDy IRTCLODy LTE“ (2d, ISIA(ARD yg 27 
; #ASPKCS),ATTC 10,15) 5 FATT (105! 6) gLARL( 7), 2a 
j tXM CZ, SV gVACS TPA TAT TICS, 5d,IATTI(19,1 7) 2a 
ENUIYALENSECFHEID, TE) C 
| FQUTYALENSES TVA, STK (55)) wy 
2N=£7.2957739512k 3? 
i NR=1./R27 ™R 
BOEL-411.7* 32 ts 
SDFL=COS(3IEL) 25 

SNEL=SIN(SODEL) ZH 

PDFL=291.%9? a7 
| REWIND1 78 
PEHINNZ 39 
q REWINDS at 
! CALL OIS3ON(6) 1 
TOTT: 9aT=(AJAT) u? 
TGO=S7GONDETT) 42 
CALL COS=GI1L976.5=L 9 OF ySL) ub 

CALL SLITE (I) us 
4 rg CONTINUE uh 
4 ICT3=0 47 
{ ICT4=:6 ue 
TI=SECONICTT) uQ 
READ(1) TWCyIGCy (7 4E VT) y Tei g IWC) 59 
IF(FOF(1)) 110,69 54 
q a CONTINUE =? 
MNEMN=FHDD(D WO) cr 
FHED(IWC)=5_9FILE Su 
FNCOVE( 33, 4O0G1yLAIL) CTHENCT Dy T=t53) yp I4EVCAD Se 

QOL FORMAT (245255 2Xy ALC 9 1X y AR) 56 

GMT1=FLOAT (LHEN(19997100C. 57 
TRAT=FLOAT(LIHED(19)) ZFLOAT(THEN( 700171096 5a 

SMT Z=GMTL-FLOATCIY=DUL7)0)4T2AT 59 

FHEN(21)=97.54 AO 
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PIISIAM S34+LAC Ces14/75 


£9 


S299 5 


a QA 
a 2 ae 3 
+ 


Tybee 


XIOTA=FHE9(21)9 

WETT= (3) IWS,I Gl, (FT HEV) yI= 1, IWC) 
JN=I4E9625) 

CALL TOAT3(LTIM os TYsMONSFHFIC 27), INL 53) 
CONTINUE 


O MASTER FRAME 


PEAN(CL) TAD, TGC, COT VAT OT, Jd, T=1y, IWC) » S-1,75C) 
IFOF=EOF (1) 

YFECTSOFE LVESTY GO FF 106 

PFANCL) [WON yg ITGTA, (CCTATT CI, I) yp THLy ICA) gy J=1, 7GCA) 
TFC TA&TTCITACA,TGCAD NES IGHATYT RECDRW 31 TO 15 

ICT S=ICT3+1 


> JNPACK ATTITUDE MATOTX 


Te eee 


~" ee 


IFA=20*I3¢ 

CALL AUT IS SIDA STATE C2p 2) 5 LCV pKCO, UCT) 
NWCH(ITITA-<1)/3¢1 

COLL S2U>3C(LATT (292) 9 SATT gNAC) 
ALT=" OA(1) 

ML FETLOAT (CIDAC2V)972056 
XLGS>LOATC(TIA(3))7100. 

THE T=FLOAT(TOA(4)) 1706 

TFCXL T5372. 99.) KLI- XLT =260, 

OME G=FLOAT(INA(3)) 7/1256 
XLTM=FLOAT(TIA(5)I 7120. 
XLGMEELOAT (TID (79971566 
IFCXLTMe3Te906) XLIM=XLIM=35C. 
RKM=SLT#637102? 

RPNM=2KM/1,95 325 

CALL INVIPEXLT  p KLIe ALT pe BOLL yg TAy HL yt %y i Ty RO) 
CALL FNTEV(CELySLs 22 pigt gFlySLX) 
CALE INTE PUL hs FE Pos Ge Leg F by FEM) 
HMN=( FAH ZL KP SSLY 

IF CHYN.LE. Ged WYANSL. 

IFCHYN.GT. ALT) HMN- ALT 

INA (8) =3A*1G0)0.4+.5 

TFCFL oh Ted ee IMe=LesTo2bed FLE2. 
IVA (9) =5_719050+.5 

TOAC19) =44NO 2S 


~ 490 CEawe Tey 


Teens 


WO 65 PEst5ISC 

NO AC JJ=1,10 

ATT (IS,IT) ==LOAT CIA TT( IS, IT) 9/200. 

IF CATTOC Sb, 159 GT e300) ATTOIS, TT) =AT TC IS, IT) -3E0~ 
CONTINUE 

IFGE&=¢6 


APP=t= 7 =f2Z1 


PAG= 


oe 95>A 


504 


+ fs 


15d 
7h eeeEe 


M S33LAC NEs14/74 


CONTINYE 
SGAM=COSCXTITA* IF) SCOSCXL T# IQ) 
TGOAM: ABS (SG4™) 

IF CTOAMeLE et oe) 59 TN 14C 

XLT=.99*XLT 

TFGSQ=TF59e1 

TPCIFPGS «Wesley SO FO 126 

WETTE (65,2005) IST?,XIOTA, XLT 
FORMAT(1%,*L AT O28DFLEM AT*,TS, 2F1001) 
GN TY 19 

CONTINUE 

GAM=ASIN(S34M) #29 

TFCUTMET ea ToD Ge eA ND. THE T OL Te270 0) GAY=170e—-S AM 
O3=ATAN2Z (39, 3T) #7 

XTR=ASIN(32/B4) #23 

OTCi) =-€990.+GAME D9) 

IRT (1) =3 

OT(2)=90.+XT3 

IRT Ce} S14 

CALL EUL= 2 (THA ,g>ANZY My PT yg IRE 92,0, THI PH Ag KM) 
CALL EVLA 2CIDe leg Meg AT ye IRI, Cy ty, ANGT ANG? yg YM) 
IF CANGTe_ Teded ANSTHANGT 4 SAL. 
TFCANGFe Ted 0) ANS PFHANGPS F7, 

IVA (11) 2179. FANSTH.S 

INA (12) 2190. FANS 2t+.S 
TOA(L 3) HTIAC LED =2 

MO &f TL=1,L6C 

AD Go SSL 59 

JJ2=2* JJ 

JJ1L=II2-1 

PHA=ATT(ISI1, 11) 

THAH=90.44TT(US2, TT) 


CALL EULTRIFHA,>IHN gS XMSRTZTRT pGgty PAT TC OIL TI) gBATTOSI26TT) ov 


CONTINUE 
NO 450 IL=st, IGS 
99 1680 Js=1,19 


IFCPATT OCS Jy ITT) oL Te od) SATII IS TQIAS TTC IIT IT) #360. 


JATTCOSSe TTISLIIFIATT CIS, ITI +25 
CONTY NUE 


> ACK FO? OUTPUT 


"Seeere 


CaLL AUTIVC IDA TONE (291) 5 66,KCN, ICD 
TWO A-MAXS (CCL WEA 2), ITN) #2 
TGCS=TG0441 

CALL S2°C3Z(LTATT(1,°6C03) eyATh, TIA 
ICD=(LTTAs1)7341 

IFCICO.LT.3)) ITNT CVed 

TWO R=MINICITN, 30) 

IWOP= MAXI (TACHI WTA) 
IGOR=(ICV$197350+T57R 


ADP=f- 7 =122 
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PAG: 


122 


IN MM VN Vo +4 +4 Fe pe oe pe be 
FANHEOODeMPN DAF WwW 


ee a ea ae 


ell el eel ool eel ol ol oe a ee ae ey 
a 


re pm bw pe pe 
wa ‘ 


— 
7 
2 


. 


®,JGIAM SIELAC CE14/73 FAG: 


IFCMINCITV,CWCd) 2F 220) TGCE=IGCHe1 
TATTCIWC3, ISC8V=175MAG PETO?RN 
TATTCIWS3,I35C04) =1] AATT RECOPAN 
TaTT( TW03,1) =10HH<> RECORN 
a ae 
WOTTE MASTER FRAME OYTOUT 
“eee 3% 
WRIT= (3%) TAD, TGS, CCTOAT CLI 5) y TH1,IW>) , 3=1,160) 
WPIT (3) TADTB,ISC%, CCTATT (1,5) sl=1,° 405) J=1,IE609) 
ICTG: ICTS4¢1 
IF (MCOCIST3, 4) NE?) GO TC 10 
HR=(SMTZ*°LOAT(T IAS (1, IGS) F TRATI 73570. 
CALL TIATIILTIMy TM, MONGHR 57, 01R) 
XLAM-C. 
IF CFL eGTeted XLAM=ACODS (SDPT( 1. SFL) DF 29 
XLOT- HR#XL35*. T5E665657 
ITE CXLOCT ST .242) KUT THXLOTH74. 
OGL FORMAT(141,4Xy*S53-7 64 SECOND LISTING FRIM MAGNFTIT 
#® FITLD 229Z2PAMFLEY,FEPHEME ONS FOR fy Eine by 1Xy ALC y7Xy 
e* COMPUTER QUN OF , ALE 
#7S5X.59RF ASC NSTON = ©, FIG «dy* INCLINATION = *,F16. 3) 
IFCITTS¢FU.L) WRIT” (85 2001) HR MONA TAT SIMEG,XIOTA 
FRECLSUScE Vek) VITT= C8sctLS) CASE 
2017 FORMATC(SK,FIRATT TY = *o3A10/T25,*G=IC-NFRIC?, 
+T6O y"GFOAMGNETI USS IOK yO TT MEF T20y*LATH, T30y*LCKGY,T35, 
#F ALT yT42, FTTH TAF, TSF, FLA TM® TER, FLINMF,T 79, FR (KMDF, 
TOL s® 3, Ti cry PLY Fi C Ry *HMING y T148,%_ AM-DAF, Ti 2S, *L TIME *) 
WRIT! (85 ?Ji4) LE IMC SD gL TIME 4) yLTIM(S Dy x>LTy¥L Gy ALT, TH=ET, 
+XLT™, XLG4, 244,34 oy LyHMNyXLAM SXLST 
-6£46 FORMAT (7K yg T2 9 2T 39 = te Sg F 10 eS F Vel y SFL9 6 9-19 045F 1965, 
F190 oseFid. Lg CEL eT) 
Ge. Fh £8 
CONTINUE 
GALL CONWEStS) 
WRET (98,7502) ITTT7. STS 
WPIT- (hy 2592) IDT7,F5TS 
+502 FARMAT(1¢,15,* MAST=2 FOAMES READ 729M TETLE AR, 
#1iXgIS9* “AASTER FAAMES WRITTEN ON VTLe*) 
T2=S: CON IVCTT D-T1 
WRITE Ce, 2003) TT? 
WOTT’ (652903) T? 
"GO? FOOMAT (2X, *2ROCESSTNS TYME FOR ORBIT IFS*,F16.3) 
ENOFITLE3 
CALL IISSONC6) 
6O ¥" SO 
t4G CONTINCE 
CALL CONN? 705) 
T7=S° CONV TT) <T8 
WRT T© (5.2935) T? 
WOTT™ (652995) 2 
FORMAT (AX, *TOTAL PP OSESSING TIME FO? S7ALA TS*,F10.3) 


APO-Fe 7 123 


229G7AM S33LAC Of 714/74 


CALL NISSON(6) 
ENN 


APP=F= R =124 


LE 


ae95e aM SS5act GA/14/749 PAG? 


PROG2AM S3SACO(JFILE,EFILE,Y FILE,7FL LF, OUTINTH64, 
+TAPELZSOFFLE, TAPE2: “FILE gTAPZB=YFILE, 
+TAPEI=7FTLE, TAPZH=TU TOUT) 

TREK REE RHEE SEER REE REET EREE ER EOE EE EEKE HEE ET REE EER EE 
~Feevse 
> 1776 PROG?IAM, FF. 49LEMAN, LAST ALT? 2ATION 9 SEP 77 
> FOM S23AS3I 22 IES 7F. 
Te eee 
ee 
° POELIMINASY SORT OF FATA GY “L* AND HAIN, 
7 S©&PAPATION ONLY. NO SO&TING 
2 22 LINE PAD LISTINGS 9> PAL PHA INSTRUMENT ONLY oe 
> NUMEGER TPEST2UM ONLY. NO FLUXES CALCULATED, 
oe a 
oe ae 
ITT3 COUNTS @2CORIS 2FAN. 
oan a. Ae] 
a os 
526608 34 STIQZAGE VFIVTPEN FOR LOADING. 
~Feeee 
> ALTERATION 4TSTO®Y. 
: ZH AU 77, FHANS=Y HMIN GALTULATION =O? 4MIN >1000. «™, 
reebeyv 
Se eees 
SME RR MARA RAE ER RE REE MEE ERR RE ERE EER EER EEE RE RE 

NIMFYSTON TIAT(70,15) o JNA (ERD, ERG (33) ,- E260 33) »BORL( 78), 
FEHE DC 30) TALE VCST) gL TIMCB) gSVAT (1254) yg ITQUT(14,13) gX2A (13), 
#KOAT6 4,3) 5 SVTT (10,26) pp IMA (24) yy SATT (195127) pKNAC15), 
#IPANL (12 51257) yITOLI2 (9912 yh) gTATT (3345) gp ION2H(17) 4 
*TMAT(C1 591257) gp IMAT( B12) y KMAT( 300) ,LACL (3), IC AL(4) 

EQUIVALENCE CFHED,I4F9) 

EQUIVALENTS CTION, JIN (55)9 

COMMON /T9SEGGS IMA Gy THE TAy PLOTAg QIN My XLT XL yg ALT XL TM yX¥LG 

PATA TPAIL,TOAN2 gL IUT SAS4ESS 

BATA ERR 4116059195 op HD og 5 Bey SD eg 27Dey 256 yl Se Sg l5 eg lhe 3y 
$150 9 Fey B57 980 dr Ay Geb lyeol go O2y Fehlyg Se Ky Se Sly 
2 eG27 gy Pe DD Pe F582 eC 1y Le HS, oe GURyG ed M94 0D By 3.64, 

#1 656,163591624/ 

JQATA SHIRL ALleslelt,LolSgtelog1ol7 91018, Le19DpLeColoweieatdy 
HL eS yt Dy lo 7 Le By ley 20 glo PyFa tye Gyg2 a fiy Sey SoS gtny 
Se gFegdegliv yg 25e/ 

SATA ROR SD eet Stee PU oe SGley GOOe gy SI Joy GOI gy 7OCe pATDe pIGLey 
Fi COD. yi5SI Jey OND Fey 2Z0E0 eg Ulli ey 60000,106709067 

FLUXC TFL) == LOAT CTT LX eAND MI SKS) ZSFLIVTISHIF TC IFL KX +45)) 

MASKS =SHI=FT(0143,545) 

MASK3=777777 7777777773 

MASKT=777773 

SNG=* 5 

St Sle 

KWOM==992 

REWINOL 


125 


> pe re Pe pe ps 
NP AN ee > 


P?20G6°AM S3SACO OR /14/7% PAGE 


REWIND2 

RFWINDR 

REWIND 

TC=SICONID (TTT) 

WETTFE (8, 2094) 

FORMAT (141 ,4X y*>207ESSING REGUN IN S7SACF) 
CONTYNUE 

IFGC--1 

IOTM=0 

ICTi=0 

FETrs=e 

ICT4=0 

T1L=S*= CONIC(TIT) 

READ(L) IND, IGS, CF HE VII) T=15 IWC) 
IFCEQFC2)) £19,69 

CUNTTINUE 

MNF MOG=FHTDCIWO)D 

FHEO(JWC) =SLEFILE 

RTOTA=FHE J( 21) 

ENCOVE(30,4001,L43L) CIHED(T) ,I=4,3' , T4906) 
FOO MAT (24525 52K AL. 91K y AS) 

THTL=G. 

ALTL=0. 

HMNL=0. 

FLL=?. 

BELHCe 

OTHT=.c47 

NAL T= 0. 

NQHMN=0. 

NFL=C. 

NBE=0. 

WRIT (2) IWS, IGS, (C= HEOCL) gz ty JWOD 
SMTI=FLOAT (COHEN(138)971060. 
TRAT=FLOATCIHEO(19) PD SFLOATCIHENC 20D 71209. 
GMT Z=GMTLSFLOATCIAZOCL7DDFT2AT 

CALL TOATSCL TIMg TM4 4 MONG F HED C27), 9742 1026) 51156) 
WRITE (652994) 

WRITS (9, 201)) 

FORMAT (141) 

WRIT5 (06,2003) F4EVC 27) »MON,LARL 
WRITE (6, 2003) FHED 027) yMONy_ABL 

WRITE (9,2093) FH=V( 27) yMONygL ASL 
FORMAT(SK,*IRATT ITV*,F 8.2 5A10 5 2X, SAL-) 
IFLL=-999 

IBEL=-933 

THML=-999 

CONTINUE 


READ MASTER FRAME INPUT 
TPeCEE 


’ 


PEANL1) INS, IGCy (KTOATUL, dy I=L, IWS) » I= 1,160) 


APP-AR=- 8 -126 


PFISFPAM SZISACN 05/14/73 PAGE £27 
IEOF=EOF( 1) 112 
IFC I-OFVE.9) GI TA 20 413 
PFANL 1) TWCA,IGSA, CC IATTCI,I) , I=L, 140A) yJ=1,TGCA) 114 
IFCIATTCLACI,TGOA) .NE/} LO0HMAG RECORD GY TN 10 1tS 
peter 116 
> Jt PACK 40USEKEZSPING £27 
ceeere 118 
IIA=10*1I3°5 112 
ITB=(IIA-1)9/7 341 126 
CALL AUTOC(CINA,TATE (291) 9 KC, JCNZICY) 12% 
ICT 3=ICT 3#+1 122 
HR= C(GOMTZtEFLIATCTIATST (1,1)) *T2ATI“S360). 123 
CALL TOATI(LTIMe T M4 yMON SHR, ID, 618) 124 
ALT=I1DA(i) 125 
FL=FLOAT(TIJA(9)9/1C0609. 12¢€ 
FE=FLOAT(I9DA (82 )) 7412600. L2F 
HMN=fENA(10) 128 
RKM=ILT4+6371.2 129 
RNM=27KM/1. 35325 13C 
OMEGA=FLOAT(IIOA(5)3/10C. 131 
THE TA=FLOAT(CINA(G)I710C. 1%2 
IFCICT3.NE.1) GI TI 250 £33 
THTL=THETA 134 
ALTL=ALT is5 | 
HMNL=HMN 136 
TMAL=TMA 137 | 
FLL=FL 1 3A | 
PEL =8E 139 | 
OTHIL=.015 149 ] 
NALT_=C. 141 
NHMNL=0- 142 
NFLL= G6. 143 
OBEL=0. 144 
759 CONTINUE 145 
steve 146 
> S=¥ TIM= AND DELTFA*S LOGEC {4&7 
AeREEE 148 
JNOW- (TATT (1.1) -ANV.4ASKB)/S14 149 
INOW= JNOV-IGENC 29) 150 
IGAP=INV=-T_LAS 4S4 
ILAS=INOW 152 
X¥GAP=IGA? 153 
IF OXS APs. Teled XS&%=1. 154 
NTHT=( THE TA=THIL ISX GAP 155 
NAL T- (AL T-QLTLI/SX35 AP 156 
NHMN= CHMN-HYANL) /XG58P 157 
OFL=CFL=5LLI SKGAD 158 
NBE=C9F-$35LI/XGAP 159 
ITFCASSC9OFLI6GT..025) BFLAENFLL 141 
IF CABS (NIE) GT ee G25) OSE=NR=L 162 


APO-2 R =127 


© 2IS7AM S33AC1 35/1477" OAGF 128 


ITF (CA2S( VSL TD STL 265) DALT=HISLIL 143 
ITF CASS CDAMND 056T. 265) OHMN=NYMNE 54 
NATATL=TTHT 65 
OFLL=DFL AF 
YBEL- OBE 67 
DAL TL=94_T a 
OHMNL =O44N as) 
THTL=THETA rr 
ALTL- ALT 74 
HMNL=HMN 72 
FLL=FL 73 

: BELH=RE 74h 

TMAL: TMA 75 
IGCa=2 


| TFC IZSCAEV.5) I552=6 

CALL S2U>3(LATT(1,T653) pJ ATT, ILI 
70 269 If=1,I6C 

F NO 250 Js=1,15 

‘ PATTC SI, ITISSLOATCJATT (JJ yIF 9) 7/1906 
=55 GONTYTNUF 


* ® De 
"fA UV, 


Bt A dt i 
>  3IEGIN ONE S=TONN P2NT=SSING LODE. 
7 RENE 
TIi=t ae 


} aC CONTINUE 
O00 7 Li{2+Ilt,T6= 
{ OTM=CTOAT ty TTD AN VOMASK2 D/L A -UNOW 
q IF(NTM.GT 215.) JIM=15. 
TECOTMALT she) TIME « 
THE TA=THTL eV THTE IT 


ee a a eee ee eo ee ae ee a a ae: 
7 a, | 
7 OPN TN 


| ALT=2LTL#94L T#0TM 13 
| ‘ HMN=4MNL*J44N*9TM 12% 
FL=FLL+07L*3TM 195 
BE=STL#O3Z#ITM 196 
4 TMA=TMALEDTY 127 
| PKMESLT#H371.2 198 
RNM=2K4/1,35325 199 
CALL GEDGA(TMA) 295 
TFCXLTMe ST el AGed) “LTM=XLT M=461.6 2t3 
| IF CXL TeGT61906) XLTHXLT=360. 202 
TMA=TMAt!, 217 

HPA=(GMT7#FLOATC(TIAT (Ly TT) TRATI“ 35270. 2c4& 

IFCXLGeLTO90) XLG=XLS4760. 20s 

; XLCOT= HRAtXL3*.065456657 206 
NO 4140 JJ=1,27 297 
{ IFLC= JJ 298 
' IF CAIRL CISD eL TePLe ANVOFLO LE. SOREL JstL) 2 GO TO 16U 2%9 
140 CONTINUE 210 

150 CONTTNUF 211 

MO 770 JJ=1419 212 

IHMC= JJ 213 


APP-F= & =128 


LSS 


PE 


PIDZSIAM SISACI OF sS14/73 PAGE 129 

TFC BIRH( IID eLECAMNLAND JL HMN.LE eSINRHCII41 9) GO TC 3a} 21% 

"7G CONTYNUE 215 

~S SETS AYA 

™ YOR ALT=QNATES 4MATIN Pr OSENURE, 217 

At Oar & Pia 

HMN=ALT 244 

IHMC: 1€ 225 

IF CHMN.LE 259020) SALL HMALTL SE sFLA HYMN, THM) 224. 

IFCAMYN.GT.LALT) 4MN: ALT 22? 

7RY CSONTYNUE 27% 

TECHYNS ST. ALT) 4MN- ALT Ps 

LF CTASSCIYMS-THML) 0ST. FeANMUTSTG4ANE. %) GO TO 7C 225 

IFC OT FLOSS NE. TELL eo D2 eTHMOeNE eo TAML) eANISTOTM. GT 24) GI TN 2C 276 

D LDFLPRINT 7IIGVTI,IAL T+ IAMCy THETA, ALT, FL yHYN 22? 

7OSG FORMST( 145055 2025571205) 228A 

KOA (L)=KIACL) FIFE KCALT) 229 

KDAC7)=KIA (20 ETF IK (15 06*XLT) 236 

KOACT) =KIAC3D # IF IK6190.*XLG) ats 

KDACKVEKIA CSD ETE TK( 100 8 THETA) 232 

KOA C3) SKIN GSD ETEK (200.8 OMESAD 773 

KNA(EV=KIACS) IE IK (1006 *XLTY) 234 

KNAC7P=KIAC7TV4FIIAC7) az 

KIACKVEKIACS)P FIFA.) 236 

KOA (GV=KIACIDV# TET XI L00C.* FL) 237 

KNA(100=<IDA( LI) TF TX CHMN) 2%a 

KNA(S3)=CIACLIDETERX (L066 *X_6) 2%q 

KOO (LGD =KIAC LGD TET X(160.*xX_CT) 266 

KOA C15) =<€ 90015) #1 24d 

99 320 Jset1,12 242 

KNACJIDVATKIAC SID OLTVACIS) 24% 

"3])0 OG UNTINUE 246 

ALT 2=ALT 245 

XLT2=XLT4 24h 

X¥LG2=Xi5" 247 

TOTM= INT4e1 248 

ICTI=ICT1i¢et 249 

CALL AUTOS (CJDAT,TIAT(3,II) p< CIgUS0gf 3D) 26 

CALL S2PALC(T OAT 2, TI) 5 KNAT,._CHND 254 

yy eere 282 
> AN MATA TO PITCH ANGL® OISTRIAUTION 253 | 
Topas 254 
TES A=SHTFTCTOAT C1, TT), 45) #gs | 
TCALCLIEC CAL CAVETSALC3V=ETGAL (ude? 256 

IFC IFG Ae oT 7) TPALL 1) 214 267 
IF CCL FGA CAND *78) 036%) ICALS 2) 21 25a | 

IFC CLF SMe AND 6 35) ooT etd TCAL(3) =1 269 

IF COTFSACOND 618) 0653064) ICAL(G) Sh >6n 

AT 260 <<=i,4 Pad 

IF< ICAL (KK) LEQ*1) 19 TO 240 26? 

IF CJVAT(L 9 KK) GE S4MASKO) GOTO 266 2H? 

KK2=? #KK >6u 


APhah> § =429 


” o———e = 


22937AM $3SAC9 C6/14/73 PAGE 439 
KKL=KK2-1 265 
IPA=AASC3ATTCKKI TTI S15 6.41. 266 
IFCTOALGT.12) L2A=12 267 
TFCIPALLT 21) IPA=1 26R 
KK3=(KK=1) /241 269 
NC 150 JJ=1,12 270 
TPADL (CSS TAWA KKZD=EFOANL CSIs TPA KX IIEIIN TOSS KK) EMASKA 274 

159 CONTTNUE 272 
240 CONTINUE 272 
IPA=A3S(C3ATT(C9,ITI1/15.41. P7u 
TF(IPOALST. 22) T2A212 275 
IFCIOA.LT.1) TPA=1 276 
NO 220 JJ=4,3 277 
TPAD? (LIAN LAM, SS) =IOANACLOAN, TPA, II) eK OVC S 4g LOHND HMASKA 278 
232 CONTINUE 279 
70 CONTINUS 230 
69 TT) 19 24 
?¢ CONTINUE 25? 
Elp=22 PAR 
IFCIFGC..T.0) GI TO 39 72k 
TF CIT OE NZD ANDI VIMeLE2 2) GN TD 127 ARE 
IFC IVT4._£.2) 69 T? 30 PRE 

SILOCSAFRINT 3004, L573, [= LCy IHR yDTHT yDALT, VFL y DHMN 227 
ICTG=ICT4+t 2aR 

Sees 22q 

> PRINT OFT 36 SZSOND PTTS4 ANGLE DISTRIZITEONS ANN Z7ERD SUMS. 2ar 

Se eee pat 
SNB=<KOACLS) 29? 
IF(SNALLT ete) SVI=%6 293 
DO 360 [f=1,14 294 
KIA (YT) == LOATCKIAC TID) SENGELS 295 

240 CONTINUE 296 
TE CKINC14D ST. 24636) <DAC1L4)=KOA(LG)- 24,0 237 
ALTA=KDA(1) 798 
XLTA=FLIAT (494020971006 3a 
XLGA=FLOAT(K<OA(3Z))7100- 359 
XLTMA=FLIATOCKOA(HII7 1006 754 
XLGMASFLIAT(KIA(133)/10C. 22? 
BAB=CLOATIKIA(3II72 0005.4 203 
FLA="LOAT(KIA(9))71600. 394 
HMNA=KNA(10) 725 
PRINE 3534y,LST3,I=LOyTHMC yS4 Ay ALTA,= A, HYND 396 
WET T= 6942205) XLTYA gy XLGMA GAL TA yIVTM, VAN FLA, HMAA 37 

200k FORMAT(//10,*MLAT =*5FRALZy* MLIONG =*¥5F%e7y* ALT =¥%y 708 

FF Re1,* IT = Ve Toi dX, * RAV =*,FR,2,* LAV =, 234 
Foe?) * adv =*,°3.1) 1c 
WRITE (39,2001) 244 

2001 FORMAT(/3X% g#P HANG PAL N4 PA2 N2 PAZ NZ PAL * 312 
+*NG PAS N5 AFR NES PABS NBAF) 313 

ye eene 314 
> SFT UP LEPS FITCH ANSLE MATOS Ty 215 


APP=6= "9 +230 


155 


FL 


PIZZPAM SISATI 06/14/73 PAGE 131 
Oeeeee BtiF 
90 139 K¢=141,2 317 
NO 176 If=i,12 31a 
XPAC(TIDSFLIATCLIF CTT 910047. 19 
IMAT(L% TIT ep MK) SSHE- TOT PADLCL p Lie XKDy HGS) seat 
Ne 1-0 JL, 12 rP¢ 
IMATi Sdg TI MKD HT PRM CSD gp TIT g KK) CAND, YASKSY 32 
280 CONTINUE 328 
“CGF FORMAT 2K, FoelteT ae T7,3TFy BI7) 374 
7947 FORMATO 20, "Geely ly > Gely SF to! » BFI1) 326 
yar a CONTINUE 32f 
139 CONTINUE 127 
Ve eeRE BPR 
er StT UP %-ALP4A COINS “CDE AND SRONT NEF PA MATRICES 329 
> Sete 320 
NO 13@ If=1,12 Bry 
pO 2:0 Jd=1,8 3X2 
IPADP CIS Sg TL yp 4) HSHIE TOIL PAN 2035, TT 9 1), 45) 233 
IPANA (SI, TI yg LI=TONVAC SI yg TT51) eANDEMASK? 334 
TFCJI-GT.5) 30 19 709 335 
T Jz 2 FJ Seo1 7%6 
ICUT(CT JS, TT) =TPAV20 II, TI _1) 337 
TFCIT E921) INUT CT I,13)=0 338 
TOUTCTJ,1 3) =TOUT (13513) ¢ IOUT CIY,II) 33a 
- 76 CONTINUE Bac 
™902 FORMAT(14,5112) Bat 
POLL FORMAT (2K, °6oi gp 2 lg 7T7 gp 2TA gle Sg T7e Lue) ) 342 
199 CONTINUES WHY 
TOUT(11,13)=0 thy 
nO 3°70 [l=1,12 345 
NO 353 Js=1,4 The 
TPAN2 CIS yg TIy 20=T ON VA] (IS g IT 197) oe ANDIMA SK? 3Q7 | 
‘SQ SONTYNUE BLA 
ICUT¢11,TI)=TPAIZ(-, IT, 2) 349 
TOUTCi1,2 3) =1T9OUT (1% 513) 4T OUT (11,11) 35C 
720 CONTINUE 354 
yeeeen 5? 
> SFT UP SACK DET AND VD DF O85 AATRITES 363 
sr eer G54 
TOUTC13,13)9=6 tS5e 
90 216 Tlei1412 356 
10 270 JstigS 35? 
TPAD? CSI g Ty SP =TINIZC II yT Ty?) eo AND. MASKS 35A 
226 «CONTINUE 26Q 
TOUTCL 3, TTI = LCAVACF,ITT, 2) TKO 
TOUT(13,1 39= TOUT (47,143) eT OUT (1 2,I1) 2HE 
“16 CONTINUES TK? 
NO 3160 If2i1,12 63 
OO 3446 Jbei,S TAG 
TJ=2*J55 TAS 
TOUTS TJ, TID =TOAN2( JS, TT, &) 3AF 


APP=t= 6 -131 
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yeaa cecal 


22> 59AM S3S5ACI 04/14/73 PAGE 132 
IFCILTCE2.1) INUT (TI, 13) =5 76? 
IOUTCT 4,132 T90UT (14,13) ¢ITOUT(II,IT) Hx 
469 CONTIYNUS 2A9 

TOUT(12,13)20 770 
TOUT(14,13926 774 
TOUT(12, II) = IPAI7(+, 11,4) 372 
TOUT(14, TI) =YAAV2Z65, IT, 4) <7 
INUT(1291 SDSITOUT (12,130 #T OT CL2,1T) T7746 
TOUT( 14,13) =T9UT (14,13) 2 0UT (14,17) 37¢ 
bib a CONTINUE t76 
CALL PAC=Z(KMAT, KIA, TMAT, IPA D2 gKWND) 777 
KWOM= MAXI (KADM,<W)) ™7K 
WPIT™ (2) KAIVD,1—5(<¥YAT(I), T=1,K W917) 779 
XOA(L3)=40. 34¢ 
no S82 Pt=ist5 Wwyq 
¥St=3 74? 
Of 220 Jk=i, 2% 247 
ISL=ETSL#+C OUT ( IS, ID) 244 
120 SONTINUES 7AE 
TF CIStLe sf edd ARITE 09,2007) KONCTT) gC TOUITCT ATI) g¥eiygied THE 
#e CONTINUE 7R7 
WETTE (552917) FLA, AMNA,TIVIM, (LTOUTCI, 13) pl=tyit &) ZRA 
CNL2 FOO MATCCLX = 7e 3p Fel g T5997 (TS, 13))) 34a 
20C7 FORMATLILX,=6.1, 701651 3))) 34F 
TFETSO®.WE.9) GI 17 160 Lee! 

,e Sees ta? 

5 ZERO COYSTANTS ©92 VEXT LAT,LONG ANK 343 
: pee cae beer 
i INTs=6¢ ze 

$6 CONTINUE 236 
0 Gf LTSlste2 297 
KOACTID=35 3 9A 
NC GY JJ=1,12 z99 
TPADNT CIS, TYy 1222 SFT 
IPANL CII, II, 2) 29 a | 
IF CSI eaTe 8) GO TY 46 Go? 
TPAD (II, TT, 1) =2 a3 
IPAN? (JIJ,IT, 2) 20 4Gou 
IOAN? (JJy TI, 30 =0 u7% 
IPAN? (JJ, II, oD =2 “16 

6 CONTT NUS 4°? 
IFGC: C ao 8 
KIA (13) 2) 629 
KOA(14)=) G1 
KYA (15) 2) 4t1 
IFCXL TST. 390) XLTEXLT<360. wi? 
XLT1=XLT¥ Pa | 
XLG 14> XL34 uth 
ALT1=ALT gts 
TFLL=TFLS 416 


THML=IHM3 ai? 


e295> 


. fr 
UJ 


a 


Tae 2 


rm) 
2 
n 


AM S3SAC) 


69 TY 99 
CONTINUE 
WRIT? (3, 233 
FORMATI1x, 1° 
#1XyI5y* 2ETO295 WATTTEN ON 
+* MAYIMU4 JUTPUT 27>ANRN STZ: 
T2ES=CONICTTT) -Tt 
WRITS (85,2053) TT? 
FOOMAT (2%, *2ROC=SSING TYME = 
FNOFILE? 
GO 1) 50 
CONTTNUF 
T2ESEAINICTIT) <TC 
WPTT= (83,2095) T2 
FURMAT(2X,*TOTAL F2OSESSING 
END 


IST?,16T4,K wn 


tin 
-—~_ 
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FFILE#S 
WAS*®,T3) 


OR ORBTr 


TIME FQ 


8 -133 


OF4L4773 


* RFSORNS REAN FROM 4FTLE47 


Tc*,F10.3) 


S™SAC TS*,F 10.3) 


PAGS 


=23390m S3SAC1 OF /14/74 oAaGe 134 
SUBRIUTINE 4MALT(RE yFLyHMNgS AMC) 4 
DIMFYSTON 29265) 478692) 90% (H 92059929 66) 35 
DATA BORA /100C. gl FGG0e, 2000. CCC. ysIl ie, HUCh eS 4% 7F 
DATA CA 66439354 617978501561 3y ot 2291 oo 929% 4. EDTA, 42? 
40167 215.135365 2953-525 GCO611 5 005511450. 346 99S 438 
NATA Cs Foley 01150 2 VIF ge G62, 2. D4. 01’. 439 
4 1 S57, 245g 01294, 2 0954 eC FAU, 0741S &&O 
JJ=1 Guy 
TFCFL eoTe 4s) Jz? a4? 
XL=ALOG13(F.) 4G? 
DO,215 <P Esh95 G44 
BOPRCITI=ACICIT ZIM eCACIY, Sod FXL G45 

pas CONTINUE 446 
On 2; TVSiyo 447 
KK=If 448 
TF C309 X(T TL) -GTeSE-AINDe3FLGE.2NRB(TT+idd) 39 TN 20 449 

#C SONTENUE os 
HMN=", 451 
IHME=s ft K52 
QETURN G5? 

FG CONTINUE G5u 
THMC=19#<K 455 
HMN=¢ 35-8923 (KK) IZ (RIRE(K KEL) H—BIRE (CK) FCANOH (KK EL 456 

FeO TRHEKKD) FI DPH( KS) £67 
RETIJIN 452 
END 453 


159 


-?9G67AM S35ACI CF /14778 OAG= 


SUBPJUTINE PACE V(TMAT,INA,T291,I1292, [FLG) 460 
SERRE URE CE RE EEE CE EERE TET ROUT EERO RHEE EEE E EES BENE EER BERLE EE EE LAL 
~ wee & A? 
2 LNT SU9227S2AM. Fe. HOLFMAN, LAST ALTE REN 18 JAN 77, s 
 ™ FOOM PACEF Le JAN 77. 4 AG 
See Ere 4 AS 
~[ Venue USA 
> PACKS S72=-3 OTTCH ANSE DTSTRIIUTION SATA INTO © FILE FORMAT. SFT 
Skee ee ues 
Pie SEE ERE FEAE HER ER HSER EEE ERS SEEKS TEE EERE EEE EE! SEREREREEEEEREREYH 449 
5 DIMENSTON TMAT C2), SOA CLD» TPVLC13,125 270, TPN2ICF 12,4) G7C 
j SATA OTs #17 Pt 
f ICTG-ISTHet ar? 
CALL AUTSI( IDA, IMAT,15, JWOD, KWND) 47% 
a KWUV=KWODES u7& 
CALL AUTS'VITPIL, TMA T (KW) 51> By UWID, CAD) 475 
: KWO=<WO#CWI) 4 
( CALL AUTSICTOOLC Ly t 92) pIMAT CH WO) 9155, SHDN, KW) uT? 
| KWN=KWO4K WI) 473 
CALL AUTTICIPIV2, IMA T(KWO)D 494, JWOD, KYIT) 4 7a 
KWN=CWD4 <A) 489 
CALL AUTTV(LOENZA (Lg ty 2) yp TMATICKWD) 4 IA, IWID, KN) uA 
; KWOK WI4KW ID) =r 
CALL AUTSIIET P92 (15453) pIMATCK WN) p96, IWDD, KWOIT) Bat 
KWO=CWN#C WI) w AL 
CALL AUTSVIT PDA (15254) gy TMATC KWL), 96, IWNVD, KWON) URS 
KWD=CWI eK AD) <4 e864 
' IFLG:KWI +h? 
PETUPN & BP 


END 42a 


APM 2 9 9435 
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22 ISPAM SISADES CE14/74 PAG: 136 


PROGIAM S3SANF CZETLE eFFILEsY FILFa64, "FILE,OUTPLT=64, 


rey 


# TAPES, TAS 2=EFYT_ =, TASC REVEILLE, TAPES= = FILE, 14 
#+TAOFIA=7FILE, TAPE S5=3UTOUT) 12 
RS REAR EERE BSR HARE RHEE AES PRE HEERHRERRABREL SEED BP Bane HRweE 13 
TERRE ah 
S 2977 PQVZ,2A4, FF. 4ILEMAN. _AST ALTS2ATTION 15 AOV 77 156 
> fP0M S$2?S8AD 18 JAN 77. 16 
Greens 1? 
Dewees 18 
> DPIELIMINAPY SO2T OF IATA BY LCL AND HME. 15 
> 12 LINE PAD LISTING FOR P-ALFHA ONLY. YUYREO OISTRIBITIONS. 2 
Te eee >4 
on. coe 2 
> ST1 COINTS TOTAL NuM262 OF DNATA PESNeIS FAN, oe 
> ICT2 COUNTS NUYBER OF CUTPUT SATA 2FC0O7I7S 2a 
® YCT& COJNTS NUMBER DF DATA READ FCP NRITT IFIL. 2e 
oe aes ah 
SF sEEe 2T 
> ALTERATION SUMMARY 2a 
r 48 NO’ 77 AODEY S%-2 COMPATIATLITY. 29 
on. ears 3C 
SSS Gs 3 
> 5hG0°0R8 3M STIPAGE 2FEVITIED FOR LOANING, 72 
+e eERe 77 
NV ROT RRR UTI MEO SER ERR EB OME RUA MME ERR EOE RRR RE RBR HEE 4 
DIMENSTON ze 
FE HENC ZOD, TAL DC SC) LTIMCRD gTIUTC1G, 12) y¥ PACS 3) pBORL( P24) pHORH(I7D, 
FIONA (ASD pT NIK (43425 INIX (433), IMAT(3B4) y a¢ 
#IPN1i135912592) pp IPOZ6 81244), T MAT(3AG) , sR 
#KMATC2R4) yLASIL(3), zg 
SMA (1S) y JOEDNL (134125 2) y SPD 213 g 1 Zy%) u* 
EQUIVALENCE CEHED, TYE) 44 
RAMMAN JNOX 4? 
NATA IT2NL,F>292,1TIIT sB7R*O/ u2 
CATA JNK, 5991, IP 92 £711"9/ 4k 
OATA IMAT, JMAT £7398%C7% &S 
NATA BORL Sicole les leL Sel olrglolZ7o le 1%e LelFylectgledgteity ah 
$LeSsl chp lis lp Leh ele My Pee Setele ty eeGe2 she Sey Se Sete 47 
5 gFe pSe yi te 9 25e/ Gs 
DATA BOSH £04510 90» 200 0 gp SED. 4000 SIMs pHODe p7OC ey 80004 4G 
FGCD oy LUD Fe ph S5ODe peldtey SICGe yp HOO oe gd FOS og 19000. eC 
N9 330 If=1, 433 | 
JNOXCIDI=¢ 52 
723) CONTINUE as 
KNO X= 384 Su 
IFGA-0 35 
IFGR=G6 546 
IFIL=9 SF 
SN@=oc.e "A 
SLFEHCe a 
KWOM= 250 =o 


AOPaRe @ =436 
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TT es 


2>95°AM SZSANF 26414774 PAGE 137 

RPEWINDL at 

REWIND2 42 

REWINDS 5% 

PEWINNAG Au 

TOT 16 65 

TCT 2:0 SF 

CALL OPE NMS (4,INNK 4434, 0) a7 

FIL=e&s3 BA 

ro=SPCONTCTTT) AG 

WETT" (852954) 7£ 

S ADT AWRIT? (6,2013) 7 

2004 FORMAT(14454X,* 220 7ESSING RE GUN IN S3S4ANF) v2 

JEGF=49 72 

, at CONTINUE 74 

\ JFOF=JE9> +i ‘ue 

IFC SSOF.GE.%) GD TS 260 7h 

; IFGC=-1 v? 

: INL T=0 78 

TOTs=0 79 

FCT&=0 nat 

T1LSS°CONVETT TY) Ay 

RFAN(2) IAC, IGG, (FP 4EN(T), Tet, IW) 22 

IFCEVE(2)) 50.69 Re 

FE CONTINUE Qu 

JEOF=0 RG 

IFIL=IFIL+L %¢ 

ME MMSE HD V(TWC) Q7 

FHENCIWS)=3_FFILE ae 

TFCI©IL.E G01) WATT & 61) TWCyIl GC, CEHEVCI) gI=1,TWC) RG 

RIOTYSFH59(21) 9° 

ENCOVE(30,4)61,L42_) (THED(I) » I=ty 3) y T4676) at 

«021 FORMAT (R45 255 2X, ALS 91K, A) 4? 

FOR Fas Q3 

TEC OTHE NC LYCANS 7777777 IAD oH Ge GAS S22) TSAT=AP Qu 

THTL: 0, a5 

ALTL= 0's ae 

THT: 6 c47 q? 

GMTAI=FLIATCTHEV(1390)0 71000. 98 

TRAT=FLOAT CT HO 70199) CFLOAT(CHED( 2001747025 aa 

GMT Z=GMTL=FLOATLTA “NCL 7D) FTPAAT Lt Se 

CALL TOATICL TIM, TM% ys MON SF HED (27) yp THE V076) 9119) 101 

SOLD PAWPT TS (652903) FHEVOC27) .MONSLASL 16? 

WRITS (8, 29039) F427027) »MONyLAAL 1¢3 

y O41. FORMAT 141) 106 

WRT T7 (3, 2003) FHFE7027) yMONgLABL ins 

S32 FORMAT (SX, FIRITT LIF, F 8.2 ALO, 2X, 3A19) 2 ge 

16 CUNTINUE in? 

+0 CONTTNUE 1¢R8 
IF(T™GANE CC) PLING 3GC1, TESA, IW, TiMyLELy I IN, ILAT,ILONg NUM3 

IFS A=0 iit 

~eeeee a Be 


APP=A- 9 =137 


ie ttle eet ne meee ~ 


P29G2AM S3SADE OA/14/73 PAGE 138 


>  2FAN EFYLE 2E39R0 AND ADD DATA TO QANDIM FILE 112 
SF SSES 113 
| PEAD( 2) IWS, TGC, (XMATCID» T=15 THC) 114 
; IEQF=EOF (2) 115 
IFCIFOF.NE.3) GO TC 10C 116 
ICT4:ICT4#t 117 
ICTi=ICTi+2 114 
IFCISAT.EQ.2) CALL UNPEFCKMOT,IO4,I231,I°N2,TWC) 119 
IFCISATLEI.3) CALL UNPESCKMAT, IDA, T231,T9N2, THC) 12C 
TFCIMC.LE.C) ITESASL 124 
IF¢IWC.LE .O) GO TI) 9¢ 122 
7991 FOCRMAT(1%,42I5) 123 
i THEETS 1246 
3S DETERMINE L AND HMIN INOICES. 125 
} SRSteEes 424 
HMN=T9A(19) . 2? 
FL=FLOAT(TIA(9)) 71005. 128 
ILAT=INA(6) +9009 129 
IFCILAT.GT.18000) TLAT=€LAT- 26002 136 
ILAT=CILAT<“1)/5C 00% 131 
ILON=(I39A(13)-1)7355ut1 132 
YALT=CIVAC 1) 4971953 133 
On 3¢ Tl=1,27 134 | 
TEL=1T 175 
IFCBORLCII) LT.FLeANDeFLOLFARORLITIFEL93 3 TO 4O 134 | 
36 CONTINUE 137 
GC CONTINUE 178 
00 170 Tf=1, 26 139 
IHM=ITI 146C 
IF (CBIRH(TID SLES IMN, ANDSHMNGLESBORH(TT #2)) 69 TO 25} 141 
132 CONTINUE 142 
IHM=17 143 
250 GONTYNUS 146 
IHM=17-1I4™ ug 
TIN: ‘TEL-1)9 16414 sig 
CRASS LFRINT SOIL, I LAT, TALTyLILONgIINy IIL gy li4y FEL 147 
IFCINM.SGT.415) IFSA=2 1&R 
IE CIFL.GT.27) L=548=3 149 
IFC IQENGST. 432) TFS0=4 1S¢ 
IFCILAT. sTe35e0%eTLONCGT. 72) TFGASS 151 
IFCILATLE Ge OReTLONGL E60) ITFGASS 152 
IFC IELLE} De DRT HM.LES G) IF SA=7 15% 
IFCIFGA.NE.9) GO TS 90 154 
IF(LIIN-EQ.ILEL) 39 79 140 155 
| CALL WRITMS(&,TMAT, INOXCIIL) IIL y=1) 156 
i IRN=LIN 15? 
q IFC INOXC LIND 6£90G) TRI=433 156 
1 CALL REAIMS( Gy IMAT, INOX CIRO), FeN) 159 
IIL=IIN ; 1460 
149 CONTINUE 164 
; TFCINDOXCLEL) «GE.t) G2 TO 212 16? 


A°P=ARe Q 138A 


163 


S2OGPAM SSSANE C65/14/773 


oo CONTINGE 
NO 1590 Fsi, FHS 
“€GEESs 
> NFW DATS FOR THESE 292RNS, 
~~, RTA 
IMATCTIT)=KMAT(TT) 
CONTTNUS 
KNOX=13? 
IF CIWS GT 2197) “NVX=394 
JNOXCTIL) =KN9X 
60 F2 95 
°19 CONTINUE 
«eevee 
ANG NEW OATA T9 IL} 
EEE R YH 
JWC=-1 
IFC TSATLEQ.2) CALL UNPEFCIMAT ,JD48, JP 355, 5°92, JWCO) 
IFCISAT.ED.3) CALL UNPESCIMAT, JDM, I> 415 S297, IWC) 
TFC IBVE.LE. 2} SO TD 2356 
NUM1=I948 (15) 
NUM ?2@-JDACLS) 
NUM 3=NUML& NIM? 
LSS 2PRINT FHILeLINe NUM? ge NUM2Z, NUYS 
IFQNIM3..£.0) I=GA-€ 
IFCIFGA.NE.9) GO FO 90 
A 25 E¥sist2 
HO 22 J#0=2t,1 5 
LPNLOSJy, TI 919 =F 701 ( SIg TT, 13# JONI CIS, TI, 1) 
TPN Sdy TD 92) HTP SdSy ITg 22+ UPNL (US, TT, 2) 
FRC LST SD TO 70 
OY F2 KezeS% 
IPN2C SIgT Ty <KV HTPIV2 CII TI g KCK) (JPV20I Sy TL KX) 
FONTTNUF 
CONTINUE 
IFCIYAC2).5F 2.96350) LVAC2) =IFA(2)-36326 
IFCTIVACH).ST2 2906) IVA (6) =IIA(6) =-369 10 
IF CJVAC2)25F 29000) JIACZ) =JIAC2)-36030 
IF CUNA(6) 5ST. 92000) JSIA(6) =JIA(6) - 350270 
OS ceo FLet; 24 
TOACTIVSCIIA CTI FNIML4 JOA (CIT) © NUMA) 2 NU4Z 
e290 CONTINUE 
IF CIYAC2).LT.0) LTIAC2]V=HTVA(2) + 36009 
IFCIVACH) LT 6G) IVMAC6H) HTOACE) + 36609 
INA (15) =NUM3 
Twos? 
TFCISATLE.2) GALL PACFEFCIMAT, INA,I?> 11, 129N?2 sI WC) 
IFCISAT.CEI.3) SAL. PACETCIMAT, TD4,I2? 31_,TPN2, TWC) 
IFC T4C.6T.KANM) W2TTE( Hy, 3001) 1860,f AC 
KNIV¥=192 
IFC IWC.GT.192) KNYY= 3HG 
JNOXCTIL) =KNAX 
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60 T? 96 

CONTFNUE 

WRIT™ (6, 3062) 
FORMATC1,*INPUT TOMPLETE*) 


R=GTIN OUTPUT. 


CALL WRITYS( 4, IM4AF. INOXCITIL), LL yt! 
IFisP: 6 
O09 170 [C%=15,432 
IF CMSOCIITI 4,16) £901) IFGP=1 
EP CIPOXCEL ET: ch Fol) GO Fa 173 
IF CI=GO.EV.1) W2ITl(S, 26140) 
IFGP=9 
CALL REAIMS(4,IMAT. INOXCIIID ,III) 
JWO=-2 
IFCISAT.EQ.2) CALL UNPEFCIMAT, INA, TI? 31, TOMA» JWOD) 
YFCISAT.CEQR. 3) CALE UNPESCIMAT, FDA, [7 3145 $2925 JWG) 
TF CUWO.KE. Oo) GO TD £790 
WEI T= €1) PW) 91- €EYR TCL) oe Lets JHD) 
TGF 2=TORees. 
ALTA=T94(1) 
XLTA=FLOAT (TNA(2)9)7138. 
TE CXL T4.57.390.) XUTASXLTA-336. 
XLGA=FLOAT (TY DA(7) 9715G. 
XLTM=FLOAT (194 (5))7109. 
TF EXE TY eat 23 Oe) KET M=KXLEM<3556. 
X¥LGMEFLOAT(IOA CL 3997106. 
RBAA=-LOAT (IIA(8))/729000. 
FLA="LOAT(TIA(9))72090. 
HMNA=TOAC19) 
IML T=IOA(15) 
WRI T= (96.2355) XLT, XLSM,ALTS, TOLT, BIL, ° LA,HMNA 
PFOFE FORMATC//19K sFMLAT =, F 8.25 * MLONG =*,F8.2,* 
+FB.1,* TIM INTEAVAL TS *FyTR/1OX%,*31V =*¥ O81 Sy* ~-Ayv = 
#©R@,7,* 4A S*,°5. 43 
WRIT=(9,2031) 
27931 FORMATC/3X,F PK ANS PAL Ni PAS- Ne PAS NS PAG 
+*#NG PAS N5 PRES NF B® FAS4 N36*) 
so pee 
> SFT UP FeALPA44 COINS YONE AND =SOKRT NET OF YMATOTCES 
Sees 
AO 240 LP=zy tS 
N0 268 JjJ=1514 
IOUT( JJ, CIV =0 
CONTINUE 
XPN(L3)=9). 
AO 1390 Tf=1,12 
XPA CE LD == LOAT CLS FC LI -1)9 47.5 
DO 296 JJ=455 
JJ 1=2¥% JJ-1 
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JISJ2=dI1L +1 
TOUT{( JIL, TTI =TOI2 CII, T1511) 
TOUTOC SIZ, TI) =TOV2C IIo ITS) 
IFCIT£EV.1) TIVTCII1LyL3I=ZIOIT( JS2513) =9 
TOUTOCIS1, 23) =TIITO ISL 413) 4IDUT (SIT, TT) 
TOUTC II2,1 3) =TOITCII2 13) tIDUT(ISI2,TST) 
CONTTUNUE 
TOUT(11,IT= 1°92 (8, TT, 2) 
TOUTC1L 2, TT) =I20209, TT, 4) 
TOUTCL 3, LIT) *T9N205, 11, 5) 
TOUT(1%, TL) =1992(5, IT,4) 
IOUT(11,13)219UT (121,13) # TOUT (11,01) 
IQCUTC 12,13) =IDUT (12,13) +L OUT(12,TF) 
TOUT(13,1 39= TOUT (12513) ¢TOUT (12,171) 
TOUTO14,1 5) = TUT 614,13) ¢T OUT (14,TT) 
CONTINUE 
OY So PE=bek 3 
ISlL=5 
00 12120 Js=ty14,? 
IFCIOUT(CIJSJ#1,7F0) >.) GO TF 120 
ISL=TSLELIUT (Jt 1, 797) 
IOUTC JI,TTV=TOUL(IFI,TII #1 WF OUTCs ser, IF) 
CONTINUE 
TFECTSL «ST. 0) WETTE 19,2007) KPACIT) gC TOUTCT, IT) plist) 
CONTINUF 
IF CISL eof. Ot WRITE C4, 2011) AAAyFLA,ZIYNA,ZTILT. (CIOUT(LT 13) 4 
T=1,14) 
FORMET(1X, & 3,495 
FORMAT(( 1X97 be 
CONTINUES 
CONTINUE 
SO Webra 
CONTTNUS 
WRI T= (8, 29G2) TITS 
waka LWREDS Chg 2 762) Ths 
*"g02 FORMAT (4X ,15 5* Sc GORYS READ FROY &: SLES) 
T2=S- CONVCTET) -11 
WRIT  (6,7033) T? 
7052 FORMET(C 24, "SEA TIF SOS OP7TT FS s- 16 57) 
GO TY St 
DLO CONTINUE 
ENON FTLEL 
WETT= (55,2039) I5T1,1CT2 
WOT T= 08,2003) 1771, Th T2 
760% FORMAT (2%, *2ND JF FUN STATISTICS*Z 
#cX,15,* PFESORNS F°- AN FROM = FILES 
FEXETSG” RESORUS NCLITED WH FRLLE} 
T2ZESSCONICTE TI-79 
WRIT" (By 2995) 1? 
FOOMETC 2K, *FNTAL S*OTESSING TIME FO? S*SAN IS*,FiG. 3) 
END 


+] Rey pF Rot gly (1M y7(L 35T 3)))d 
1, 50TH,T7d_ 2057,TS))) 
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SUBRIUTINE INPEZ(IYAT,TOA,I2? 0C1,F992, °F LG) 


SRR EERE REE REE HE SEE EERE SEER ERREEEE ERE SERRE RARER EEE HE 
-¥ERe 
RFT SUSPRIGRAM. EF. AOLEMAN, LAST ALYOREN 2h SAN PT. 
FOOM UNPEF 13 IAN 77, 
eee RE 


a oe oe ee 


reece 
JINPACKS SP=? EFILE JAPA FILE INTO PITS? ANGLE OPSTs MATLICES. 

reers 

PRM SSSR EEE KERR SEES REE EEE EEE SEE SKS EEE EEE SEES EEE EERE EEE 
DTMEVSION TMAT( 1), DAL) gp TPV10135 125 7) 5 TON? (5517, 4) 
NATA ICTs s37¢ 
IWC=TFLG 
JFLG>-1 
TETAS TCTs 4 

CALL AUTICITIAgI MAT, IW, JWOD, XWDD) 

KWO=KWDDFL 

TFCIOA NE.LSY GO FF 20 

CALL AUTICCLC PIAL, TYATCKWA) TAD, SWING DY) 

KWOSKWODeK ad) 

IFC THN .NE2156) 50 79 15 

CALL BUTIS (LAV G1 ig 20 yg TMATIKWY) gT NV, JNDODK WAND) 

KWAK WIDEKW) 

IFCIVOWNE.156) 30 FO if 

CALL AUTITKI OVS), IMUTCKWA) yTWD, IWIN, KAD) 

KWO=<KWODFK A) 

IF CIWONE.95) SD TD 10 

CALL AUTIT(TPDA C1 ty 2d 9 IT MATIKWEL) ,IWY, HID KWON) 

KWAN=<KWIV4eKW) 

TECIWONE.95) 6D T? 16 

CALL AUTIF CT PVALAsgt og Te IMATIKWO) » TWY, JHDD,KWOD) 

KWO=<WOD! KW) 

IFCIVONE.}93) GI TF 10 

CALL AUTOS (TEVA C151 5G) pg IMATI(KWD) IW), JADD,KWOD) 

KWIO=CWDVECA DIAL 

TFCIWN «EI. 95) GO FI 20 

CONTINUE 

WRIT: (0 92613) ITS 

FORMAT(A4, "SANT PFAQ Q2ECNRNE , 15) 

RETURN 

CONTINUE 

ITF CKWO N= ITWCOAND.TW52GTL CS) GO TI 12 

TFLG=KWI 

QETUIN 

END 


ee ae ee 


APP=h- 9 =442 


SURBPNUTINE JNPEE CT YATS INA yT201 pI2N2, TFELG) 264 

DIMENSION IMAT(1),TIAC1) y IOV 101) FP) 202 9129 &) 762 

DATA ICTs s37 363 

IWC=TFLG 366 

IFLGte1 ZEEE 

TCTG=TCT 441 766 

CALL AUTIC(LTIOA,TMAT,IWD, JWOD, KWOD) 367 

KWO=KWODDEL Z5R 

IF(TA9.NE/15) GI 79 10 ™Hq 

CALL AUTITCLIO VW, PMATCKWD)D TAN, SHIN, CANDY) 370 

KWO=K€WID+KW) 371 

j IFC THO.N©&.156) 359 ¥N 1 272 
CALL AUTIT(L ANA, TYR TCKWO) yTAD, IWIN, CAD) w73 
{ KWI=CWDIDE<W) 37h 
IFCIWN.NE. 33) GO T7 106 375 

4 CALL AUTYT LT PVA 615457) ,TMATCKWOD, IW, NOD, KWOD) 376 
: KWN=<WIDIK AD 277 
7 IFCTA4N.NE.95) GO TD 10 373 
; CALL AUTIS(LTPI2 (41915 3) pIMATC KW) IW), JSWOI,KWON) 279 
1 KWO=KWD JK AD 386 
ql IFCTWOLNE.95) 59 79 10 784 
CALL AUTIT(LAIVAC1 eto 4d pYMAT(K WI) TH), JIDV,K NOD) 3A? 
KWNECWOEKAD INL SAR 

IF(I49,£9.95) GI TO 20 ZAG 
} ra CONTINUES TRG 
WOTT? (6,7)139) ICTS ZRF 

PCL: FOOMAT(1K,*#SANT RF4N RECORNDE,IS) 3R7 

PE TYIN ZARA 

26 CONTINUE ZaQ 
LE CKMD NES TAC CANIS T WG GT2U) GO TD 13 Ge 
TFLG=KWN 59¢ 

~ETUTN 39? 
i END 793 


ACTPeR= G -443 


ee 
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SUBRIUTINE PACEFCIMAT, IDA,I? 01,1702, 'FLG) 
DIMENSTON IMAT (1), T9OAC1), TPV1C12, TPV7CR% 412, 4) 
QATA ICT*% /)/ 

ICTG=ICTS +i 

CALL AUTSII(TOA,IMNAT 515, JWOD, KWON) 

KWO=KAVIEL 

CALL AUTTIVITPOLyTYATCKWD) 5156, IWIN CANT) 
KWO=CW9+ CWI) 

CALL AUTS I(T PEN2,IYAT (KW) 4955 JWI9, KA IN) 
KWI=KWI4+CND) 

CALL AUTSN(LPEV2AC152592) gs IMATCKWID 496, IN ID, KANN) 
KWO=KW9+CW 9) 

CALL AUTZI(T PN!) (19159399 TM ATC KWO) 5 95, IND, KWDD) 
KWO=KWO+KA7) 

CALL AUTTN(TOV2 (15194) gS IMAT(KWO) 595, IWID, KW) 
KWI=CWIECA DI N1 

IFLG=KW) 

RE TUQN 

END 


FILZ2C5 s/// ENT OF LIST S407 
FILZ2Ce s7/7 END OF LIST s¢777 
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HEADING S$73-2 REFERS TO SATELLITE S3-2 


HEADING S73-3 REFERS TO SATELLITE s3-3 


~~ SATELLITE SPtq>, 
ee 1.16 as 

PA/EGY= S,5-", 
7 #,09 *,590 


HYIN = 
8,-13. 


9.70 0.9" 


S512. 


9 e929 1655 20272 o TEL TARE 
Jt $.%6 

PA/EGY= 5.&-8, 

70.09 9,01 Hef? 

90 .ce6e 0a? 7075. 1Cen 


HMIN = 447. 8 = 
6.-1%. 
0.79 9290 
©1671 


§ *, 06% 6227 25 96C 


~_* 
ac Q : 
J Coot Ost) oder eer 


0136 


_i1.%6 
Ye ©,5<8. 
eon 9,90 
0.98 9.99 
0.00 0.9% 


HME Ms ow 
e.-13, 
0.79 0.99 
eC0 9610 
0.790 


ph ec 


0.0% 


13.°25, 


1.596 


ef 3 


Ua °2F 0 
2.0 


0.60 


FNERGY SPECTTUM LISTING 


e1971 7350 
2 eS 6 


of163 o84 & 
E 3.247 
120 


BVREGO™ A. 


2.113 


eve 


02076 


P/BEN = 


of 


+186 48202 

«2155 P7850 = 
250-575 

Ce00 C.0e 

7 c296 602d 

sC98n |. 07% 


1.0875 
Feels 

O.09 2623 
20147 916 
0075~ 


2349 


02215 B/8FC = 
250 SUa 
M00 Je? 
6.90 S.C. 
held 9.6F 


1.1445 
50.-102. 
0.90 *.09 
04195 
ele? 


e23146 8789 = 
che =S0s 
Ce80 OeGu 


0.00 1.0° 


Aes 


30.4. 2875 


L266" i. 


ZQPA = 


1126 «507% 
S700 .~ 335 


(+ SATELLITE S73-26 “NERGY SFZCTR 


* bie oi? NMEN'S S56. 8B 
C + pavecy= 5.58, 8.-1% ‘ie 


LAS F-3 21M tie De 30 fe li Tel? sfe2i s012 ifel si 272s 2i- 


90 .9191 .206 A347 .279 «KEE 
ff 60232.1.51 7eFC4% 4787 2.953 


UM LISTING 


a 01930 6/B=E0 = ©9953 EQPA = 25022 
725. 254-50. Feri as T tes3eil. 


037 16295 0482 16587 2.063 36.2 1.257 .6-€ 
0453 14019 2435 12.90 1327 17406 Llels 2225 


ks. 402% _HMIN © 433... 8 = e2322 B/9E0 = 152465 . COPA 2. 77.3% 
( + PAsEGY= 55-8, 8.-1%. 13.-25. 25.°S0. =9.-100. ¥ Se%i3s« 
nF We FF 9 e087 Osh D Fo00 920° SeOC Oc00 O60 5020. 085 6.8 oi8e. ty0n 
ON 0.99 9.09 .9999 992 11702 C76 62500 291 13523 1050 666 «27%h~ 1535 
€ *___ @ 2a7% 1022. 26396 0626 1e5L2 0449 2.365 0357 30.37_.266 53.6 20878 .f ae 
gee Zoi? HMIM = 381. Sz 02975 @O87B8E0 = 1.06739. SQPA_= atm, 73 


(  ™  PASEGY= 5.°-A, @.-13. £3. 
: 7 1,99 2.03 0 05 
- 99 21671 6147 .1674 .116 .0ER1 
€ *____@ £037 «733 67927 3457 «3283 


bs Sekt NEM St Set. OB 

( + PAVEGY= ©.5-8, 6.-13. £3, 
70.97 9.09 %6°O 0.77 0.07 

90 .G98f 2.098 0.79 %.90 «(9.07 


€ *___ 8 «3975 «398 Se "S Bed 9.03 
ts eed NTN = ‘57, 8 

¢ “PA/EGY= 5.578. a.-13. 1%. 

_ 7? 0.99 0.609 %."0 0.720 0.00 
=~ "@0 0090 9609 9629 30 %. C7 

q * ff Gs 06 00S Fo70 Gygn | sect 
( t= 1.17 HMIN = __ 55. PR 
( + PAZEGY= 5.°-A, 6.°13. 13. 
7 9.09 9,00 0.670 9.09 0.00 

“ 6 Get OCT Colo Foot Tees 

( 0 9.79 9.00 9670 9.99 9.07 


( 
( 
& 3% 


Fre er te ae 


-25, 254-50. = Ue-hdes Lo ae 
0.30 y 2 pa t* ° 2, Ws 
0048 09551 o2?2 0125) 0030 902 0a037 o021 


048% 68972 4236 16°71 0172. 56.0 «373K .12* 


 _ s2f153_ 97960 = 404116 faPR = _ 79,54 
-25, 2246-52. SQ.-10%. ¥ Feso25ts 
Gs 0650 Ges de 0) eG eS Sods Se di 
Weld «1047 OLS 8.00 0.09 24.5 539=7 =5-- 
9030 o124e 6572 09529 004d 70d 0287: oo 3h 


= 02214 8/950 = 4.136 #69092 

=25, 27.-5%. F0er100. 345-192, 
2.90 C.90 Gecc 0.09 3.00 go i0 563% 
0-06 O.d0 Jedt 0.03 Fe00 5.6 3690 Joa0 
fetO - ClO Jet= de Sees Fees eee bya? | 


= s2290 B/SEQ = {176i EQPA 2 87,25 _ 
-2F. 256-506 = Je-1d56 T Jao SL To 6 


Je0C 9.96 9.072 .C123 1012 Sel FF h=S 7hae 
ToG0 O00 Dei 1.90 9.90 8.8 JsTt 3.08 
2e96 0.90 0660 2.418 0.00 38.8 68 2,0¢ 
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(«SATELLITE S73=7. -NFRGY SPECTIUM LISTING _ 


. Vs 4.18 HMIN = 622. R= 414882 AVREQ = ,.93992 EQPA = 220622 
( 4 PAZEGVY= 5.°=-8. 8-13. 13.-25, 2=.-50. F,-190. tT Sesegd7, 
| « ? Ge 3.0% 8.F) 1.00 20219 2022 62552 2023 0079S 2015 14.6 0137S 031 
SOCLS efd? Lele? ch70 ied@? o1200 1. 78h 0090 3,367 099 26.0 2.293 .25 
\ 0 9eF 29 1627 1007%F 06939 19484 2.695 1he7K 0°37 28.12 2691 17005 21.52 
sinks 4o1S  HMIN = 572. B= .19148 B/NEN = 41.0431 EQPA = 43.47 
( on» PAZEGY= ©.F-8, 8.-17, 17,-25, 25.-5u0. £0.-10). T <3.s-405. 
9 7 __G.00 Ge9 0460 046 19206 1620 9265 1917 9638 1019 f».2 .)325 
4 GO 69496 6262 1.243 o211 .966° 0197 16651 269° 20-75 .995 21.6 1.530 .2 
" M 7olB0 1.529 7.614 o952 2.730 9653 Gh.u6 572 24.5— 596 123.2 25,43 


“ -s 1.18 HMIN = 454, RM = 2002 87950 = 1.0749 F2PA = 72443 
(= PA/EGY= S.5=-8, Susite  f3y=25s 254-50. ae es Pe tT Pare & ae 

o F090 D600 Ool% GeO Oe0S O60 019% 6029 6.94 “22> Baw 253-8 s0-6 

. = T oise ) Ea Pas BET S eae 
€ » O S155 6996 F397 e739 2.792 2431 3.290 1326 3.947 254 3624 35 Sa2 .173 


« be 1.18 HMIN = 365. 8 = 02879 B/REQ = 1.1999 =OPA = rz 
C = PAZEGY= 565-8 8. -t% 13,-75.° 250-56 €0.-203. T Sedei 
" % Met? 9.00 FelO OOF QOS 1206 Ce30 Ot 2OSe~ 6OS@ 6.0 6-8=5 
. oO UeOy 2 HAL «CLG? The W034 eked .0fe wivdd wos” Fee «id3L 
Cs @ E597 660 63299 320 o1Ss~ oi 2G eo 7S73 9212S .OFK2 w142 3500 oo3ie w1 56 
= ies 1.13 HMIN = 264. Re e2177 8/359 = 
«ON pesaies is aoa 
4 ; * 
a“ 


( UL = 4618 MIN = 165. B= 42192 B/SEQ = 1.1608 =9PA = 55.1: 
( PAJEGY= 58-8, 8.1%. 13.-25, 262-50. “e-1056 T 
7 6.09 0.09 QA 0.00 0.66 C.9: ~. 


0.00 4 


+ ELS 1018 YMIN = Whe Mie 2297 B8/BEQ = 1.2133 EQPA = 57.22 
( « “PAVEGY= 5.88. 8.-13)  -13.-25. 250-55. €G.-t0 : 
7 *.09 0.0 220° 


C.00 


000 O60? 


“* SATELLITS $73-2, =NE°GY SPECTRUM LISTING 


-pt wn 1.2% HMIN = 2... Af e821 B7REQ = 1.6715 EQPA = 37,65 
PArECYs S.SoR, Bask Se 1%. eis 202-56 53071 9%. T FeFril>. 
Q. 94 9.09 O.°9 9%. Ho0* 39.00 0.96 Jee eds e900 22% 2038 Je G6 
x 2.20€ «991 1.8%8 a else mar Oe725 et 9% 7 6A .37E oe * G02 .25 
0 2¢. 0% €.93 19296 3,47 rye? 2693 766K 3.06 sr 2,36 Shae F-a3e L197 


L = 1619 HMIN = 655. % = .2858 O/7REN = 1.0261 S9PA = 
PA/EGY= 5.F=8. 8.-136 13.-26, 254-50. 70.10). T 
P_of{She £109 . 0376 .933_. 0857 2028 . 9588 6521 01297 2023 2005 03 


SU 1.627 129) 1.886 212 16855 «169 3.599 .149 4859 1122 26.6 3.640 .: 7x 
PTS WSs St We PS PETS ETS? BELLS 6 TSt 2c 9k 6604, LI2a% S282 oeeT 


EGY= S.f=-8. @.-1%. ts. << 2—.°50. 50.°10¢. T ae 3-1l). 
2 fF Pe 38 FeOh ohetD 2hS dwt” Ot ese wid? Ese” gudG 22.2 5 1265 9$-- 
99 409% 6163 06177 0123 2937: 2092 1.487 297% 1eS05 .06 31.0 1.642 2245 
0 50934 975 5.658 e684 2.4337 «eer 12636 2469 17 9> «384 175690 1-229 t42. 


ah. SSS. REE = S86. 8 01940 8730 = 1.0485 =FuPpa = ra 
Pas i 


te: 4.19 WMI = b40. R=  ,2021 OVBEQ = 1.6922 
“PASEGY= 5.5-8, &.-13. 12.°25, 264-5 F0.-1026 
* 600 9.00 Cot} OND 300% 9.00 .OIES SOIG w0E92 .920 = 
90 26127 1.276 «332 2169 ,33h2 1.096 «9743 2424 . 7253 227k 
__ Hh 30488 2548 OL 7ES 708 2.056 ETE 9,280 WEES 7.L35 .399 


l= 1.19 HMIN = 342. 8 = eel 79 879EQ =  t.i223 
“PASEGY= S.5-B, 6.-13. 13,-26, 25.-50. FgJ.°102. 
7 Os 93 Def) 8-59 0590 O.f0 O03 Be50 Jel 8.593 Cot 
90 21471 261467 60817 6982 .084 7 603K 204690 253E 21901 2049 
0 20A57 1.97 .6176 6437 12683 0195 29466 264 1.593 1196 


.s 1.19 HMIN 2 e21€3  B/7BEQ = 
PA/EGY= 5.58, 2 ; 
oh eGR Be 38 
O0 .1F3¢ 6163 6.79 Q. 00 
0 S582 1558 22791 2279 


vu 
soles 


fos wr 


3 
3 


_ 1,19 4MIN = 439, 
JEGY= 5.5-8, 8.-13. 

: ? ree M.90 0,7) 9. 
90 (CeO9 0600 %.°0 0.10 
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—— 0-40 25-246 26— 006 0-De FI 0497-007 61210-6121 15069 6178 2362 63310-6105 


a 
a 
a 
” 


él. 2. 94H Hs ——_—3 9 9 -= ~~ F192 --B/ BEN = 26,0614 -=9PA-s 14, 29--- 
, PALES Y= 3565-8. 8.-13. 13. -256 254-50. 5c.-100. T 5e5-100,. 
0 Hd a Oe FOG PBS 

Gs 90 02451 6142 04690 O69) (CeI)2 060) 63333 6057 346929 6157 1704 3e383 2087 
we TD 20 053-0 77 — 0000-0 5-—£59% 0603 20751 6280 $305% 6695 10009 13078 538} - 


( ESUOR ETRE SE FILZ5CZ ere EN) OF LIST s//7 


4 ee So Lae ae ay a a bo Os a OS Se 2D 2 i 
@ she. 14.2 me EN Se ee) a et ‘ 
: ¢ -——--—--—_-- - a 


C 


mi JULY & AUGUST 1976 


—SATFLELTE S73-7. FNFERGY SPECTPFUM LISTING ~~ 


ee ee eee Yl ee 1151. B= ee ©78EQ = 1.0189 ~EYA =~ FTN 
PA/EGY= 5,88, A,-1%. 13.-25. 750. e9,-10%. T 525-170, 
LTT SRT EGG FSP SANS 177 U2T jeciae L2G TITHE --73. 9 17.55 .1Kh” 
. 9M 272.5 % 3H GAG 1.01 SLH0 6837 29.95 2340 14.57 1.195 36.6 4077 0191 
TTT RIT AUFTS B7D.LF S671 -G5%.7 3659 23969 1.7K SIV79 C7HT 213.64 261.3 6970 


—— lL 28 HIN = 947, Se 01637 B73EN = 1.0304 ENPA =~ “80.41 
PASEGY= 5.5-f. R.-13. 13.-75. 25.-80, 50.-109. a 5.5-100. 
. GQ eoll T.3u¥ 0178 F.07L OTT GRAN 16S [2.7 Sk3y ING 
* 99 61.51 te 98 17. S7 2947 29.5H 4642 23.94 2430 14.72 2.252 19.8 13.67 .197 
” Yevi. 0 tf. % 157.3 Web2 BPG Le 12 OTL 3 27.59 145.9 1.36 117.9 212.9 1.13 | 


SS oes tie an eS 722 a7 Bra 1: S74 ENO = FEE 
* PA/TGY= &,5-8, @.-13. 17.275. 25.-50. 50.7100. T 5.5-190. 


. . ° . 23 74B1G 2145 T2471 216G SAF 7167 4 ZelGt 7UgG” 
90 27.45 1.44 13.07 2731 13.72 .615 18.37 . 350 12.77 .222 1%.0 15.5% .1399 
TD 2IT FT Ih LISSA G92 235.9 3.74 PI7L6 2.46 11S." 1.27 133.8 L16G.1 1.10- 


EO a TNE 98 76ST HOS 1 ONG ENA 73H 
PA/EGY= 5.5-F. R.-1% 13--25. 25.-5%. 80. -100. T  &.5-100, 
. ene . . . e e . « 13) ry tT. T3G 70? rr 
; 9M 26793 .9%4 6.13 6694 15447 2655 14.44 o4F1 10.70 267 1142 1146483 .200 
LTO PUT 536 WHOS 07 114.9 2.06 12305 2.25 129.6 1.65 72eS MBs Lelt ~ 


EVO AMIN SS OOS LOR = UO EB6L RV REN = —1,138N EPA =——69,62>-— 
PRSEGY= 5.598. &.-13. 13.-75. 252-50. 59.-100. T 55-100. 
TT RTL TIT LST TBE OP IAT ET 1G 12H Be TRS UR 
30 e253 1606 307940 2.569 7.74% .HE4 9.891 2317 76713 «738 10.64 3.737 2176 

% UD SE.%2 Gels P7231 2559-75567 2.86 AND. 8 P2523 That 3S S96? 7318 1291 


s t= £626 WIN = “S50. 83 = Sse S7SFO = I.136f Eqra =  Gh.68 
ORSEGY= 5.5=9, A.-1%. 1%.-75. 25.-50. 59.-10%. T 525-199. 

RIP Ee pe OS a Tae es EO Oe «=«=Mae cane aaa 

. 30 1.471 556 1.543 «379 3.766 2.343 GGFL . 331 4.517 1198 7.6 4.479 151 

WY f6.T3 M14 14.21 7.07 27.97 1.86 52655 1.79 51,97 1.74 U7L4 GELIY L853 

aed 1.2% YMTIN = ~ “4G, = 027010 878FN = 1.2262 EQPA = 68.57 ~~ 
PA/EGY= 5.5-8. 8.-13. =76'5 252-80. 50.-10". T 5.5-100. 

PATE A SN eee ee eZ. 2 UGIN NEF NSS —CN2G LG STS NCGS 

: 9M 696% 69% R170 625% 17°75 0167 1462%5 4191 2.397 219% 6.5 1.403 .091 

wo 9125 2.75 6.451 1.61 7.948 1.17 14.17 1.10 19.57 .839 34.8 1H85° 6572 ~— 


a ee T.26 HMIN =" "353. RS “W261 B/S8EQ = 1.2603 ENPA =~ 62.97 _ 
PA/ERY= &,5=R, 8.-13. 13.-25. 254-506 59,.-100. T 5.5-109. 
99 2941 2794 o1F38 2134 ©4992 .119 27904 .121 Gee 65747 071 
WL.1A1 1.616 7.619 1.21 1.6210 .541 56225 2779 76°96 CH77 2468 56914 SU26— 


% Ut = 1.74  “HMIN =" ~~ 248. R= 22159 B/9ED = ~1.%012 EQPA =-— 81.59% - 

: PAasEny= 5.5-", 6.-13. 13.-?5. 2547506 50.-100. T 55-100. 
A ES SEER ES ESR ay Ree, ET ee Ea ge me ae et ON 

20735 2.15? .N735 1.952 2.6 .059° .930 

~.288% .786 .6911 1.309 1.056 .264 ~21.2 .7969-.179 


: C= 1.267 HMTIN = ~"1469. 8 = 02238 «=89S7BEO = 1.3713 ENOA = ~S#.52- 
PR/EGY= Se&=%, Re-13. 13.°75. 25.-50. 50.-109. T 5.5-190. 
OE GS SLE ON eC Ee. ee eet 

ws 90 4.? 
. 07.765 1.95 — P 21319 .13? ae “2Ue2 .1087 “563 


“SATELLITE S73-3. ENESGY SPECTRUM LISTING 


’ 


“T= 439° HMTN = 2038. B= e1157 8/REQ = ©9992 EAPBH = 90.00 

. PAsSEGY= aoees B.-1*. 13.7756 25..-5N. 59.-100. T 525-19. 
’ . T7206 3.37 98.0% 1.4% S6026° 1.629 23.16 77957 6.4 Ghe7T 2537” 
« 90 «6475S 16. DATOS 3673 99472 1.38 39.76 o6%2 32.89 .4%1 13.2 84.96 .500 
s7 S ARU LET PST FP iset 11.5 ~ 101.1 163% 76.3 463.6 7.15 
¢ eee 1.36 HMIN = 1732. «2 So" L]RL Bs AFQ =" 1.031H ENPA = 79.32 
»  -PNZEGY= S.S5=R, 8.-13. 13.7256 25-50. S0.-100. T 5-5-1", 


YT TS.1r I. iT mH.US e474 S5.36 0427 GT. ST 227? 28.94 185 FTW 35063 les 
' 90 1327 3.62 116.5 «726 ®2.4hH .4N2 $6071 61866 29.9H 1.12% 152.4 76.18 2149 


» OU LS7217- 7069" 990.5 BeOS 39%,7 12635 — ie 37.38% 6246 69%.6 443.9 51% 
« PASESGY= &,5-8, 8.71%, 13.725. 25.-50. 50.-190. ¥ 5.5-100. 
‘ 9 SBI SS SS SIE 25-09 TST 17 ABA BTR TST oS 


@ 99 F73.4 *%.09 69.FH 2692 59,66 6419 30634 6209 23.23 1125 105.4% 49.78 0135 
. 7 S77 tT Th 2 693.2 36399 SL1001 2.21 105.8 .69E 55.98 1.358 631.8 31053 .H14 


“CUS tech HMIN =” 9540 3° "1660" B/REM S {eegnt “EaP's SOT. 53 
PA/SEGV= 5,5=P, 8.-13, Loe? Fs 25.-506 S50,.-190, T S.5-109. 
a 7706 6 TeENG «292 Th.55 «42S PRB? .3Ne)~6COL ADB 
20 238.0 4.29 A138 ie 33 &1.19 1.97 25.33 .643 16.57 1.319 137.7? 23.13 .26* 


ee “AMIN => 2130G.> B= ~"21G81 ~S7REN = 1.9497 “ENPA =~ —ROVRG ~ | 
é — OO 2°66 26.5 %26.2 7.69 &N0.5 5.57 196.8 1.93 105.2 .33 “StS ait. 7 TG 


~ab 6, cheese OHNENS aoe B=: » ai eho PSREO = EC S7ER" EOPA“e 58.5% 

. PA/SEG¥= §.5=8. 8.-1%. 1%.°25. 256-506 50.7100. T S.5-100. 

» © e900 G00 «chee elPO SeD7G «O77 SedGl .shU S505 137 Bie 2. Lis 

* 20 102.1 4.63 29.61 1.4M 36.19 12.14 29,98 2507 13.76 «774 1064 27433 1292 

, UD OVF.Y 20k P59.L 7.79 377.7 6.12 262.1 3.56 L526 1.86 50.8 224.8 1668 

» C# YetG AWIN =” 74S. B= eI820” S7BEQ = 144081 EQPA = S743 — 
PASEGY= 5.68, 8-13, £30=25' 25 2-50. 50.-109. T 5e5-100. 


eee AF S4-1> SETEL OTS CLUS Gl Se LR LES 8.6 OE CULT ae GTP Ce CL Ta meta ars Cr 
00 52.26 2e4% 16076 1.0% 23,28 oP71 17024 05h2 11.27 0455 965 12083 0228 
y TN SOR eh 17.7 1ThoG Be 7B LTS. 7olD 193 01 VolG B3e35 Veb7-SER-T91eT 1558 


: FB T.5G HMIWN = 643. A= 1902 “A/BSEN = 1.4781 “EQPA =~ 55, 34 
~ CASEGY= 5,5=AR, R.-13. 13.°25. 254-50. 50.-190. Mj 5.5-10). 
TSI OS ceed slVod «ll? solue o0O® oH5%H 0S” Co"OS o2HS Tee e199 sUHG 


9M 27071 316 126°%5 1635 19.57 1.97 15.90 «525 3.824 «2685 6.2 14.79 .305 
- —WO7.TS 7.83 FINN GUL 150.1 4.59 1L6NLGY TLIM BX.4H 1.67 GOH 11%.7 1.47 | 


a ae T.%h HMIN =~ 549.7 RB = 7.1974 PVRFQ = 1.5034 ENPA = 54.64 
« — PAS ERYS SeS=8 8.-13. 13.°75-6 25.-50. 50.7107. un 5.5-109. 
« 7 ~UTS NEL DS =2 LUST .SUSH LURK GG .ST3S UBD 


” 99 3,624 .750 3.476 .4A2 5,617 .437 86.500 «500 7.407 1.426 7.6 4.769 2148 
“ WT URL6G 6.T8 G2.33 G13 63.16 3.26 62017 2.24 %9.79 1.22 %64% 43073 1.02 


+ = eve Aas” “Gts. Ge cenel Sere es 1.Sh66 ENPR S “S2U55 
o PA/EGY= 5,5<A, 6.-13. 13.-25. 25.75% 50.-100. T 5.5-190, 
e 7 ETE FBO e257G 6097 1029 LF RX UNS .I2e 


? 90 1.471 1.47 1.471 2600 74880 2470 3.950 «26% 3.F54 1164 S.? 5.529 .203 
——O T9835 (612 7.557 1.58 26.06 1.°8 S051 1.691 51.°4 1639 G18 41.85 .877 


ee: 


TEAS NTN 306.8 PLT 87 BEN © 1.8766 ~ENPA = 59,55 
PAVEGY= 5,5-8, Re-13, 1%.°25. 254950 50.-100. T 505-109, 
a A ee 

20 .UN11 427372 .UUL2 6180 61021 6972 9550 6153 1.158 6146 7.4 25941 2056 
——TUS725 1679 -G2H3-1673 FOK9 1777 WFTW ~STG M721 S18 UIeh 6.565 6 BHI 


( s -gaTELETTE S73-8, FWERRY SPECTEUN LISTING a Mee a Rage Scag ek 
QO Le eRe HMIN’s 252, 8 = 42228 AvREQ = 477902 E2PA = GALT 
. _PAPEGY= S658. Ben 93. 136-25. -25.-80. 59.2100, 7 5.5-190, 
; pikilit Ae diiinieht Man ie Ie tee pie: . eae remen 
( + 90 4902 .eon -0765 .N77 .0919 .041 .2778 .046 5.0 «3190 .050 
"09366 936 68294 6586 518K «299 1,451 2347 26322 .T10 F404 1.786 200° 
( . CFT WIN =~ 1s7, 8 = 23027" 9veEN = T8826 EQPA S467 
._PASEGYS 865-8.  Be-1%e 1%.-75. —-25.-50. 5 Me-100. = 5.5-100. 
ee eee ee eee ee ee eee ree ee 
(aa. an 5.9 
= Ge re ee ee ee 
(0 TET TSS WME 5 BTS 27H 87 BED = 2.1516 EPA = — 42,98 
. _OS/EGY= S,8-8, Bante 13.-25. 254950. = S0e-100.  =T 545-1006 
ka hE a i ee al 
i 
¢ 
« 
¢ 
( 
( 
( 
€ « od SS Ue ES eee ee ee ee Serene, ence 
oo Taal TOES CS RP ats A ES ; 
es 
ae 
( « 
\ U7 
( ” 


204 


a 


ENERGY SPECTQU™M LISTING 


Pts" TG MMIN = 7339. 3 21065 AZREN = 1.9555 FPA = 73.3? 
CAZEGY= 5.5-3. Be-1% 13.-75, 25.-50. 5n.-100. T 5.5-100. 
sf 23565 ITSFS SN TST SLL IN.97 LUN? S277 S22 227K 103 157 6? Ghe PS 108 — 
‘ 90 19RD 3o39 20K65 275A 10764 2753 35,00 2143 S617 2095 266.6 174.8 01246 
»  O27O7T YR. + “1621 3.66 13°.6 .725-- 89.03 .27615h1.6 697,7 .5659 
. CoS Te eee MNT s 1774, B= eiZ0L P/ZREQ = 1.2363 ENPA = 54.97 
»  PASESV= &,5-8. @,-1%. 17.925. 25.-5%. 50.-100e tT $.5-100. 


FSI eW 1.08 2.0L e51G 59,32 1596 S7IUG UG 186M IS BIG 27.6 Lee 
90) 1979 425 116.5 6A 7RLSS 647M 70,19 2207 75.02 .1°%7 9.6 65.45 0162 
Do WD!SkR P2024 G15.4 Ue71 268.6 1.664 ~~ "S774 376 597.4 330.7 700 © 


. | Ee ne tere 8 = 01549 B/BEN = “1.4787 EQOA = 55.34 
»  PASERY= 5.5-2. 8-1. 13.°25¢ 25.-506 50.-1006 T 525-190. 

7 a TGR FUNG 26S 12.907 2357 17.55 2 tie IN.6G LRT 28.0 12.07 . 18d 
” 90 329.6 %.20 59640 1925 S343 1546 25.98 «759 15.93 Ti3e 56.9 35.395 .158 
» W253 91853 606.9 S.3E GB6.F SOF LSS L21? 70.635 6575 310.8 763.7% .807— 


Y UC = T.6G HMIN = 945, “RS” 1719” BVAEQ = 1.6473 ENPA = — "SULLA ~— 


»  OPBFESY= 525-8, Berit, 17%.°25. 25.7516 50.-190. T S.5-199, ! 
» 7 e9S5F otOG Coe WT ZLGST LUST SLBOT 2 °SG SHS? . 258 Woz Se1T7 e147 Pa 


9M 111.6 % 79 34.59 1.16 76.17 «7H 20.692 . 33 17.42 .232 1864 21.59 2214 
DU0N3.6 15.6 26%.4 6.96 "76.5 G51 2708.9 2.78 96.55 1.9% 11060 197.3 1.75 


% U = T.45 HMIN =” 85%. RS 1799 P7REQ =" 41.7565 “ENE R = ~ 43.98 
, PA/EGY= 5.5-8, 6.-1*. 17.-25. 25.-50. 5N.-100. T 5.©-100. 
= ST e137 1.566 ec3l L975 «20h S897 27ST 7.4 2.186.107” 
a 90 5h. ax 2.45 23, SR 1.11 27.64 1775 19677 472 19.47 .25% 13-4 15.54 2219 
; US7*.U 14.5 201.65 6.05 772.6 G48 215.3 27.74 S7L27 1.72 81-0 157.9 1.24 
e OC = 646 AMIN = 753, HS L836” B/BED = 1.8E4S EQPA = ——U7.08 
»  PASERY= 5.58, 8.-1%. 13.-25. 252-50. 50.-100. T 525-1989, 
* F C302 GON 72451 223 26723 6119 2.477 6181 OU OC IBT L290 
» 90 77.76 262% 11027 2969 23.77 6691 14.47 6377 A170 .18B 1166 14655 2271 
* 0 175.5 8.97% 108.7 Gah 185.2 G15 Le6.6 2.72 78.9% 1.25 68.2 1299. R 1.71 
» C2? 6% WIN = &669, ARS .1970  “A/PEN = “T.971S° EQPA = 46.02 
~  OASFGY= 5.5-8, 8.-1%. 13.-25. 254-50. 50.-100. T 55-100. 
. ° ° 3 .UaT eins .06u Y.077 6097 5.6 28959 2075 
° 30 19.95 14.34 £9,4% .38%5 10.85 .689 12.61 . 681 7.090 . 374 7.2 5.970 219% 
WLS 62 8695 64060 G25 °59.75 2.91 99.46 2.45 59,03 1.44 89,6 76.41 1.09 
eh PB -SRRE Bs 2064° 879EN “= 1.9505 EQPA = 45.73 
PALEGY= 5.5- 8.-1z. 13.-75. 25.-506 50.-100. x 525-190. 


iL isk Le a2 a Ao LD e1225° .13T 
99 6.250 1652 56719 0884 6e242 0489 8.866 «377 5.O5B 1768 7a? 6.797 2190 
TRUS 6.75 V1is42 3.93 53.78 39H 82.77 7.68 60.72 1.56 39.6 63.12 1-11 


secte 


E U = “1.465 UN IN = “55. B= e217%0 = PLPEQ = ~2,.1190  EQPA = &7.51 
PA/EGY= 5.5-8. 8.713. 13.-75, 25.-50. 50.-100. T 5-5-1039. 


20 2. 216 $736 2.574 6973 3,860 2686 5.074 .432 3.456 . 356 7.8 3.136 181 
DFA 7TS WSF ANH SLSL P6617 2c 8 WheG3 1686 YEL77 1.373 28.2 34.664 .3P1 | 


«47  HMIN =” 756. R= e2216 ~~ A7BEQ = 2.22°%7 EQPA = 47.90 


« PASEGY= 5,58, 6.-1%. 13.-25. 25.-50. 50.-100. + 5.5-100, 
ae Ret eS a ee Piel ese OD aes Res 
* 94 1.961 64699 6.229% .133 2497 .155 %.476 1.520 3.7 .96N5 .108 
« “MW 15621 GeSH 11.88 2.°0 9.123 1.12 11.00 .917 16.5 11.96 2715 
Ins | 


SATELLTIT® S7%-3. ENERGY SPECTRUM LISTING 


Lo=>-" 4.te MTN = 3 = .2791 S8/7BEN = 2.2005 ENPA = 47.39 
PA/JEGY= 5.5-8, 1%.-25. 25.-50. &9.-900. T 85-190. 

pero a a AEE . eee —_—*__-5 > 

, 99 1618 .MHO 8242 1945 2089 

“r= et ; — ASRS 6354 - 2.305 shee 16.0 16536 .790 


(«> es” TSS MAIN = 183. N= ~— .2366 AVBED = 2.2133 EQPA = “42.73 © 
. PAsSEGY= 5.5? 8.-1%. 13.726, 252-50. 50.-10%. 5.5-100. 
{+ 


a 90 
x. Se.) Se eee Ce Cee Sse. Seren See 
( : TS” "“Y6S” NIN =~ > 7° Bt V276L” CVBEN ES 2.709% EWA & —X7.461 
- PA/EGY= 5.5-8. 8.71%. 13.°25. 252-50. 50.109, T 5.5-170. 
7 T . 
pes 2406 
a ea ae S9G=5 99-4 144.0 SY3=5 53-4 


“SATELLITE S73-%, 


2 


FNEPGY SPECTRUM LISTING 


C “US 2.57 HMIN = 152, 9 2 .08%L PVIEQ = 1$.M229 ENPA = 41,57 
PA/EGY= 5.5-8. 8.713. 13.25, 254-506 SM.-10n, T 5,.5-100. 
TPR BVT BNL OA 1612-78265 6265 WELD .UOO-LBV1S 197 33. FI8T o715 
( 9M 2666 9655 447.6 2.54 18467 Lo14 30699 6311 27297 6195 47.6 13467 852 
——"0-°20566 45.9 3594 13.4 295.7 %. 34 117.5 .776 283.6 908.7 1,57 
- C TTT OTS TOO HMIN => 7Bt8, oF = .09BL «~PVAEN = 1.64301 ENPA = 70.17 
PA/EGY= 5.5-%, Re-13- 136-25. 25.-50. 50.-10%. T &, 5-190, 
TRIESTE GST 469 BT GEL V7Y BILAL 5126716, 9% 037 15962 WHT 2095 — 
C 20 1955 3.47 275.5 .909 122.7 «297 20,08 134 31.18 .099 %41.2 106.5 .17t 
: TT 17DUT 183 2202 47H GIES 1646 10264 4375141026 f82.? 6399 
C TCE Sk AMIN 2° 1767S > BR = ATSS OO RVBEQ = 1.5927 EPA = ~ 52,42 
«  PASEGY= 5.543, 8.71%. 13-25. 25-50. 50.-104. T 5.5-100. 
TET TBST SS OIG a HS 21s SRE 1G S TY SLIT LOIS 169 1S 2-125 72-126 
Gilg 99 —93.9 He61 19665 1625 67449 -FB3 21657 6275 15.43 .16% 43eu 42.53 0195 
, 5262-2869 97360 759 570.8 3658 55.16.8172 37.2% 6459 74660 231-7 0953 
C » 0 = _T.56— ONIN S42 GR BS LEIS AZQED = 1.8861 ENPA = ——"G6.73> — 
.__PA/EGY= 5,5-8, 8.-1%. 13.-75- 254-50. 50.-109. T  5.5-109. 
0 LePOT SEY GT3G CLS SON CIE PLN wie U7 7L 214 17.5 5.356 107 
eo 90 15243 2.65 50.45 1.09 39.0% .A02 19,96 «298 11.27 1.166 31,3 22.47 .167 
a 0 THOT T5.f 859.9 5.96 355.9 3. 79 150.0 1.53 78.25 1777 187.2 189.7 298 
C t= _ T6585 Hen = 946. 8 =~ 176 B7BEN = 2.1272 EQPA = ~43.79 
ON/EGY= 55-8. A.-13, 13.-25. 254-50 50.-100. T 5,810, 
: ° ° TSM SL 2USSBSP 120 PUG? T1433 — BD ZelIP 119 
€ > OM 42.783 2439 Rae72 1668 25015 oP ML 16618 o 51% 8.971 717 11.0 15.66 «735 
nT TI UBT SZ LUST 27BLH TeRG hE eG 406 189.2 2ehH 75.23 167% 63,0 149.3 1635 
(Cy E_T6 5G AAT N= — 867. Bo 1859 BZ FEN "2.1927 ENPA =——-G2,48—— 
.  PASEGY= 5,528, 8.-13. 13.-?5. 25.-50. 51.-100. T 5.5-109, 
nT SORE SSL TRS TUS SNEWS LIBR « LIBL ~ UES WUT L106 75 3 S9BT NGS 
€ 90 42.869 2629 186.58 toll 18.9% 1776 12626 0474 7e71L .26F 10.0 10.9% 2206 | 
4 EBL IPT LEST SAG IZULL WSL LNIeG VSL 90693 1272 BHeb L1K.% Lol 
(0 TEI ST, BOE 193K" PZ REN = 752587 ~ENPA = 41.71 
» PSFEGY= 5.5-8, 8.-12. 1%.-25+ 254-506 50.-109. T 5.5-100. 
TTT SST TAS INT LIST PPR STIG POUT 5 OBE SSG TS 089-8 U2 92S 
ce; 90 26.08 1677 11.63 ADK LELU2 .OLL 96779 2426 6.797 2259 10.9 7.A00 0176 
9 TINE 1165 SH7 17 3680 85.5% 7,19 BN.0G 1.78 S44 91.5% 1,07 
C «0 STS WEIN S647, 7018 BRED = 2.3345 EQPA =~ GN.36 
-__PA/T5Y= 5.5=8. 8.13. 17.-25. 256-80. 504-190. T 5-5-1906 
“ SUSTY OST OG 6 TT UE 
ome 90 5.047 1693 14079 1622 MA17 «57H 7e61K 6 TST B.989 4158 PB 76562 118 
«0 BEAT 5.66 59.77 3,60 S3V6t 7.38 81673 1693 A315 1.27 63.0 67.9% 910 ~ Z 
( . t= _T.55H4IW = 558. 3 =e 2101 «BVRED-= 2.562 ENPA = 39,17 ~~ 
» _PAVEGY= 545-8. 8-13. 13.-25. 254-50. 59.-100. T  5.5-190, 
TUL GTS NGA 9735052 3 TNT I 22 
tw 90 12662 1624 6.595 oF07 3.A3C 1289 5.066 739 UDR 6196 12.9 4176 0116 
a BHU BAK 10068 5.25 81622 2.70 GSe4S L663 30.62 195K 51.6 44.75 2916 
(0 TOE ETA SS HINT 5220 RE 21KS OV REN = 265818 ENPA = 3R649 
« PAFERY= 5.5=8, Be-13. 13.25. 254-50. 5.-190. T 55-100. 
ot eeOet sete OSE ST USES CUNT Set cet Shee 
: os 90 16654 .551 2.083 6505 1.65% .318 26265 «758 2.463 0150 6.4 2.419 171 
6 T7257 67H 1335 216 10651 1.73 18.09 1.16 26 89 ,999 H1.4 20.78 .612 
| acer eee sae | 


207 


if 


*—- SATELLITE S73-2, 


3 ey 


PA/EGY= 5.5-8, 


7 


ENEOGY SPECTSEUM LISTING ; = 7 


~ 1.56 HIN = 356. 3 = 


@.-1%. 1%.-75. 


02274 «= REN = 2.7502 EPR = 372.99 


252-50. 51.-100. T 5e5-190, 


= yg 


( — 90 16962 .693 1.19% . 36% 1.313 -740 .6F18 .110 1.229 «12% 6.8 1.146 .0%1 
x * = L301 204% 11.9% 1649 19.469 29791 8.240 1.621 26.6 11.58 .684 


6.38 


vT 


1.55 HMIN = 269. * 


.__PAsSEGYS 55-8, 


( “oe 


* 77: 


«5882 
a Wo PeT22 LAS 7.619 1.21 19304 


BeetSe 1307 25e 


= o2357 = A/REN = 2.7905 ENPA = 36.77 


e416 61838 118% «30% «177 1103 2 M6K .S5SRB? . 298 3e4 .1965 .047 
e465 1.651 240% 2.965 1.340 “25.6 15814 6234 


““e?437 =3/9EN = 2,879H ENA =~ FSL11 


20368 .037 7.6 .011% 011 
~S1h13 2.161 L806 2021 “18.2 1256 2O7t 


“2965 B/BEQ = 3.5970 “ENPA &—39578 


75 .-50. 69.-10"%. T §.5-100. 
a ae I hh 5 


252-506 50.-100. T 
pare 


5-5-1190. 


25.°5%. 50.-109. T 525-100. 
“_ 
23.6 
5 aa M101 2910 165.2 529-5 S3-4 


= 4.55 MIN =~ ite, Re 
« PASEGY= 5.58. @.-13. 13.°-75. 
( 7 qn 
a >  £eSee La 
bes. =m: 1.55 H#IN = 5S Bs 
PA/EGY= 5.5-*, 6.713. 13,028. 
< 42 90 
aes gman 
C » ee at ‘ 
a ae eee ree 
( ” 
f. <a 


— 


"SATELLITE S73-3, ENE WGY SPEP TRUM LISTING 


¢ ~~t S157 MTN = 4001. A= 20634 S87AFO = 69951 ENPA = gn .a0 
PALEGY= 5.5-%, Bet". 1%.-25. 254-50. 50.-109. T 525-190. 
Se ei Big aaa eae aaa Mein RO aaa “20.29 1.77 19589 E82 — .% 27.43 2.6% 
C% 90 nin 
ee 4 


LES TRS MIN = ™m78, Be e075R B/HEN = 1.0674 EPA = 73.5% 
PAsSEGY= 5.5-8, &.-13. 17.-75. 254-50. 5, -100. si S.5-109. 
FBR. L 27 GIP? 646 52069 .425 275, 78 ,712 11.56 196 BiG 29.96.1108 ~ 
C 9H 2581 So2t S462 1676 242.0 «712 276070 0175 79.18 107 132.4% 145.7% 2297 
——— “24719 28." &3H5 $.86 1239 *%.15 #9.%3 .401 899.4 1919 .98% 


C= a6 MMTN = 2600. 8 = sina PsMENM = 1.456% ENPA = 55.96 
PAFEGY= 5.5=8. 8.-1*. 13.-?5. 2750. 59.-100. T S.5-100. 
° eOSE 17.51 2°98 GOL13 399 20.6% “e2OR S.70L F091 TOL 17 IGF 
9h 121) 3.8% 273.3 1.22 106.7 .502 18.73 0144 18.65 .10F 127.2 73.°0 .150 
. WINS 75° 20.67 2265 6.F4 O38.F 12°68 82.25 £399 749.7 519.83 1724 


TS TRS MIN = “1755. 3 = ~~ 21412 “A/V BEQ = —2,.0257 ENFA =~ 4U.5% 
» PAsEnV=e &,5-8, 8.-1%. 13.°25. 25.°50. F0.-10%. T 5.57100. 
TTT TS GTA Le ShL e2GL Se 37T 2 Ut eS Ue SSE ULO82 1S WP ot BeI5T ITS 
{ = 90 F570 4.58 17465 1.5% 466% 1729 13672 «267 9,1°5 153 2F 26 278.6" 197 
IW FGLO 2206 952.6 F.10 U35.° GeMl 93,78 1627 G1.1G 6699 154.6 730.1 1.04 


~ 


~. © neem ORIN & “T233. os 01674 879EQ =~ %.3537 “EQPA =~ ~4N,653°- 

, PAsEGVe &,en8, @.-1%. 13.-25. 25 6-506 50.-100. T 55-190, 

. BTS ee p cOTH el °G FIA 717 16568 195. INHT 109 Tee .8517 eI6T 
ar OM 11663 Ba74 52079 1.97 246.70 .h 30 11.79 2240 GeESH 6190 12.6% 15.97 2723 ! 
STP ORS TITS S160 7690 23161 Ge2® 127.6 2515 7U87 1.18 77.8 141.6 1618 


~ 


eae te ey 3 8 ~ AMIN = 955. B= 1819 B/BEN =~ 2.6% “EQPA =~ 3804 — 
PASTGY= 5.5-8, 8.-13. 13-28, 256-506 ©0.-109. T 5.57190. 
GeikT .GUL2 104 Pe 697M IDE 
90 67.61 413 36.6% 1.68 15. ge cet 3. 236 .451 6.434 .4R6 fe0 19.27 .258 
W PAT. 29.F F769 13.7 160.3 5.68 GRL76 2.53 37.43 1.75 79.2 36.39 1.59 


~ L.66 HAY" = 64%, A = 1997 P7 RFQ = 2.6714 EQPA =~ 37.72° 
28 eGy= 5.5-". 6.71% 13.°25. e506 §9.-109. T 525-100. 
oe WLS LOS 6 SBVE 1TH OUINT 1 SLT. I =O 
= 20 G3.91 3.99 24.17 1,98 1%.06 2777 9.150 .3f7 &.225 272A 6e4 9.792 «75K 
a WAPI ISU A752 8 BNB 127.7 YS29 BIL 7M 7.52 S184 1.%6 GN.H 83.96 1.26 


seetexsz eva 


ari 55, AUN a WAL e745. Be 01997 B78EN = 7.849% EQPA =~ 6,33 

« PAsSEGQV= 5,58. 6.-13. 17.-275. 25.750. 59.-109. T 5.5-100. \ 
” 4 mes eUSS2 . 051 .5310 .06h 7G. t57S Gs 
F Sm £8.59 2.77 19.56 6.979 7.91% .4F49 5.953 .293 3.4A7 214M 12.0 6.47R 0104 
_——T ee Be. 16.93 20.46 7,78 57.42 1.61 29.16 «795 65.2 57.36 7822 


~ 


CST FSWT 86ST, 8 S282 ~ A7BEN = -3.0362 ENPA =~ 25,02 
PA/EGY= 55-8.  Be-1% 13.°25. 28-50. 80.109, TT 5,5-100. 
TVP6T 2208-052 — 
90 14.29 1.73 1656 1.66 5.515 .GK0 3550 1973 16887 1157 6.6 3.737 L148 
——TAWET 1095.79 6.30 SO.71 7.80 85.50 1.63 17,08. 797 37.8 33.85 870 


, t= 1.64” HMIN =~ 566, BS 21469 P/VBFQ = 4.9327 FOPA = 35.05 
PASEGY= 5,5-8, 6.-13. 17%.-28. 256-50. 50.-109, T S.5-100. 
VUGZ IGT LT 04? SG INN 027 ~- 
90 17.16 2.95 19.71 1.06 % 379 . 359 2.770 261 16°36 2150 66 3.083 6135 
, NGL. 72 B51 BAe2M GeBU Fee47 1.96 271.81 1.26 14.89 717 1.0 27.9% «655 


C 


. 
. 
. 
. 
. 
. 
. 
“ 
. 
. 
. 


> 
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A PE ae a LR O80 UNE ols tl 


_———"a-yOs35 4.139.978 7.1% 


on Sees FC 1 eee OC 


es a ee ee eerste eenaen sites = sams 


es eit 


a 
o 
s 
« 
, 
” 
” 
“ 


“SATELLITE S7 3-3, 


EME®SGY SPFCTOUM LISTING 


ts 1.65 HAIN = GUA, 
OB/EGV= 5.5-8, 8.1%. 
gy 
90 9,706 1.69 &.517 .685 1.6% .799 1,474 173 
O 3.70 G34 29,69 313 14.29 1.40 17,56 126 


R= 
13.°75,. 


02235 «=6B/ FREQ 
25-5", 


| i 
OAsSEGY= 


“1.45 HIN = 
5.S-d. &.-13. 


R= 
13.-75, 
“T2042 >. 166 ~ 
0551 65515 184 «3676 0164 
~ 3.0K L4°7 


347, o2331 = =PSREN™ 


25.-59. 


9” 1.65% 


R= 
13.278, 


“be "4.66 HMIN = 254, 
PASESVY= 5,5-8. 8.-13. 


0249? 93/8EQ 
25-50. 


oF191 2411 21971 6192 22576 097 
~ Geib? 1.47 4652 6329 1.693 2453 


c--- 


CAs/EGY= 55-8, 6.-1%. 13.-78,. 25,-50. 


ed ee 
PA/ERY? 5.58. 8 e-13. 


“B= ~V3ab1” 7AEN 
1%.-25, 25.°50. 


an 
—> 


7 9955. 098 


“VekhSs “8/9EQ = 3.5700 ENQPA = 


whet 68S 


%.207% FAFA 33.34 
50.-190. T 5.5-19N, 
29294 VO02T Web SOLT7 VOLS 
1.149 .103 7e6 167392 296 
13.50 .65% 65.6 16.76 .52? 
= 3.3624 ENPA = 3t.05" 
50.7100. T 5-5-1009. 
20258 LOFF 2.7 USS OT 
26250 .197 3.8 .5836 -077 
GARTH 043? 33.8 Ueb7E WT19” 


FeGNBG 
50.-190. 


EQPA = 
i 
Tee 
22101 2047 4.0 .3220 .056 
1.786 2316 26.4 1.679 .248 


32.899 
5-5-1900, 


“31.96 
T S.5-10N. 
. 
54 
14.8 ©1557 .09°% 


©0.-100. 


4.3527 
50.-100. 


ENPA =~ 28250 
T 5. 5-100. 
3.7 
25.4 


——037°°.027 945-5 9556 152.6 .9201 2010” 


eS 


“—“SATELCLTTE S7%=3. FNFO5Y SPECTOUM LISTING 


LS 175 MMIN = 4272, R= 61607 AVBEDX = 41,0613 ENFA = 7A,51 
PASFLY= 55-8, 8.-13. 13.-75. 25,-50. 502-190. T 85-490, 


. T 286. G UBS SILK LeHU ILM L771 126.57 5997 5.801 «146 19.4" 29.38 2205" 


30 3146 13.4% 546.9 3.73 263.5 1LeAl 31.79 2426 10.671 1.145 79.4 144.1 2466 


; F-27408 GA.1 SPAN 29,8 7117 Be43 167.0 1.49 57.49 6895 190.8% 1°*5N 7,390 


—C se 2.76 BMIN = 3398. [se 00752 S78FO = 1.2766 FPA = 52.3% 
PA/EGY= 5.5-8. Bert 13.-75. 26 .°50. 50.-10%, y S.5-19f. 
TTS 72eU® 33688 «720 27.54 .45R 13.56 .215 5.375 .9AS GOLA 15.17 W113 ~ 

3M 27191 6.63 4S7K.7 2.31 199.6 2903 19,91 2.199 13.05 1.121 69.8 120.5 2759 


: ~O 195089 37.3 4243 12.2 15°89 4.8 GO.KS 6573 68.70 .49M 412.7 93%.A 1.35 


CS Sire" MAIN = 2617. R= 01969) «B73FQ = 1.8159 ENPA = 47.92 
PA/EGY= 5.5-8, 6.-13. 13.-75. 252-50. 50.-1090. T 525-190, 


TIO SH TS BT 7H TLL FOS AAP OSL ID SIIN STAI ITA UT 2 BV 857 TIT] - 


920 981.7 4.19 23%.F 1.61 28.47 vans 11215 6151 36689 .097 70.8 54.29 2173 
WY T36% 27.6 1979 2.20 794.0 Sel7 15616 6 %22 SHLGB 2431 425.6 477.1 2873 


“Ce Te 7h MTN SO L76N, Pe] fBAUSB A REN S27, 4746 ENPA FS (9,98 
PA/EGY= &.5=8. &.-13. 13.-25. 25 2-506 50.-190. T 55-190, 
° e SASL 129 T2771 73 VIP 7 LA? TS8T 2 08E 1b Fe TIT COT G 
9n 23549 Go 35 193.69 1657 BAL7TH 6718 BeH1E 6252 4o753 6121 2%.d 23.47 2196 


x 0 2624 22.8% 871.9 9.27 333.4 3.73 60.40 1.49 31.71 1557 1466.6 1391.4 1.999 


t= Te7S MMIN 1337, Ge ef1671 879FQ = 2,8264 EDA = 36296 
PA/EGV= S.5=%, &.-13. 13.-256 256-50, ©9.-109, T 5-5-1270. 
8937230 1.0799 2275 27230 03GB TIF 097 
90 193.5 GA? 51.58 166% 20641 .694 HoU7%7 6277 2.921 .14M 13.0 14.34 2.297 
VU 1698 29.2 595.7 17. 217.6 GAL 58.20 1.6" 15.30 .61%4 59.8 177.6 1.30 


“7 { = Lets WAIN S ~“9R2, °° 9 = 61872 “WRFO = F.2118 EPA 2 ~~ 3rL92 
PA/TEY= S,S=R, 6.-13. 13.-75. 25-50, ©9.-100. T 55-100. 
~~ Foote othO. —S—S wo AGO «UGE .USGO oNCH CoS 6 I97S oUNT 

90 76.96 %.%H &N69% 3.17 11.6% 1,09 3.735 268% 1.075 1196 3.6 8.008 .294 | 
TW HENSS 2L.7 162.7 O02 B56 95 X68 7.6% 2.01 21.95 1.98 27.6 57081 1019 © 


° Saar = Salo” 8 = 1961 “P7REN = 322279° EQPA = - 33582 
PA/ERVs 5,5<8, emi. 17%.-25. 25.°5%. §0.-10. ¥ 5.5-100, 
ein ht ne Stasi One ht T1216 205 u— 

329 97.06 1169 2Fo10 3.10 11466 1,689 56294 1441 2.596 1257 2.7 7.586 . 366 


WUT 27 7857 275.3 18S 133.0 84.19 ~~ ~~ ~~ 21.77 1.56 ~10.46 FA.46 2.27 
: C= 1.78 Wan = 768, 8 = wee eee “3.4765” EQPA = 320463 
PASEGY= 5.&-?, 6.-13. 13.-25. 750. 50.-109. T 525-190. 
as UX7 6 N26S 2025 GUST UL 
9M 45.59 3.66 23.77 2.41 5,973 778 ue 265 «580 1.778 1176 *.% 5. 2°6 6246 
TW G27.5 23.8 15165 9.79 S1.40 3676 24.54 1280 12.77 «963 21.8° 39.21 “Leis 
C= 1.74 WAIN = 551, A= 2.2116 B/REQ = %.5804 ENPA = ~ 31590 
CA/TGY= 5.5=8. 6.-13. 13.-75- 254-50. 59.-100. T 525-100. 
ft ie = OS SUE Cae Wee Nien eta 


90 23.53 1.96 17662 1.26 5.247 .G48 2.378 239 1.461 o 116 Teh 3.35% 133 
——T A758 13.8 146.1 6.77 39.465 >, 31 21.7% 1.1% 10.12.66 43.6 BLe1H .7H1 


“te ef 5 Wain oe" Se2, 8 8 ©7215 P78FG = %, 7603 EVA = 30.95 
PAVECY= 5 .5-6. B.-13. 13.-25. ?5--S0. 50.-1N0. T 5.5-100. 


ER LTS a ema —SUIG7T TLE SLUT 29S 6 72S 


90 27.94 2.03 5.147 .*79 3.217 6495 1.56% 2169 28569 .0°9 7.4 2.655 116 


16655965 -59,69 4.29 -75.90 1,80 15,46 6 9BP RLAUR SLL &7LR 19,41 9558 


211 


( . 


“SATELLITE S73-3. ENERGY SPFCTPUM LISTING hoa aR i 


O = ~ 1.76 HMTN = 454, 8 02296 «ASSEN = 3.9264 FAPA & 30.98 


PAsSESV= 5.,5-8, A713. 1%,-25, 25.-50. S0.-190, T S.S-19M. 
a aa a eta A a al meen: 5 5 
90 Seb12 4.°O F.B8C1 1.12 1.269 «236 .80% 172 .8733 2143 6.0 1.265 .110 

@ 67.77 10.1 4S.72 5.76 11.19 1.34 5.973 653 15.8 19.0% .728 


( t= {.76 44MIN = Wa, Re +2362 S/5FQ = 3.9622 EQPA =  3O.1K 
PAPERS BeS-8, = Ba 1% 130285 e 250750. =F 0.-109. T 50 5*1006 i, 

. 
3M 2.614 .A54 .%676 6184 .RNHG «29h ~ 3372 2179 ,2P7H 25S 5.6 3899 .052 
26639 GBF BeVl1H 1.17 1.077 2423 3.079 2.52% 3.732 .347 LO 3.64? .28% 


( lL = ““i.75 H4IN = 256. 28 e2482 BREN = &L2427 ENPA > 29,04 ~ 
PASEGY= 5.5-8, A.-tk 13,-75, 25.-58, €).-100. T 55-100. 
— OO OOO ree 58 
( 39 24907 .347 e17h2 2068 61307 2146 .tAZ% 047 @.m .A810 1028 
fH 1-659 1.17 ic ©3807 490 1.340 2.716 1.116 1.296 36.6 LL 7F 157 


( Speer, hi ATER: CL, HNTN = “1463, “Rez 2548  AZREN S~YLRAIT- ENPA &° 28643 
PASEGY= SeSa8, 6.-13. 13,276, 25.°50. 50.-100. tT 5.5-10%. 


¢ F 90 ©9490 .035 2.0 .0389 .n28 
Yr gis al vie. ~ 46366 450 == e1708 .124 “17.8 71776 Shab” 
4 ; UC = “T.75 HMIM = "1, BS “3103 B/REN = 5,350” EQPA-= —25,73--- 
PASEGY= 5.5°5. 6.71%. 13.°25. 25.-59,. 50.-109, T $.5-100. 


iv. 
90 1.763 .308 &NB-S Wisk 617-5 43-4 2868 .1K7% BOG 
| eee see UO oM1cO 201" £370 018 1440 C187 030 | 


~ 
a 2 2 B 


{SATELLITE S73=3.> ENERGY SPECTRUM LISTING 

€ 4. 2 feeh” MUI = 4499, % = 20594 3/BFN = 1.42044 ENPA = 65.67 
. PASEGY= 5,5=8, f.-13. 17.75. 25.-50. 59.-100. T 5.5-10N. 
TT 2UF T2180 37-27-22 STH 6499 HT22N T1EG 7.476 091° 2P sO 1 te 8 Tt 6 
; 90 2541 11.0 506.2 3.36 727.9 1.48 24.66 .31* 7.393 .17R 336% 127.7 6396 
———W21094 S659 LAAA 17.6 185 7.45 172.6% 1657 4.05 1848 270K.% 1075 7,01 ° 


. & © ke th “MNIN = 3594, S= 00782 BSREQ = 1.5778 EQPA = 52.88 
PAST GV= 5.886 Beri 13.-25,. 25-506 50.-100. T 55-10). 
° o82 17,686 6588 1324? 2309 66193 2154 V76L .OFL BBN VesH NRT 
( 90 1750 7.75 368.2 2.°%3 161-7 1607 15.7%? 6204 5.754 .937 50.4 49.55 .263 | 


~~""0 46320 36.6 3923 1169 129% 5.95 69.49 .8N5 %H.3S5 1410 310.2 737.7 1.35 


SS ee = 
ee 


“t= 1.84 “HMIN = 2581. R= e1117 CFBEN = 2.2392 ENPA = 41.393 
PA/FaV= 5.5-8. 8.-1%. 13.-25. 25.-50. 50-10". 7 SeS-100. 
TTT 78S FORTH 6327 SeEN03 2210 BO72H LS LL09N 053 27.25 2.592 .0RN 
rw 20 756.4 4.81 713.1 1.38 75.72 «726 66.967 160 3.232 084 4A.& G32 2156 


és DU 7366 29.7 1832 17.6 599.665 3.87 21645 «598 16.95 .%3% 261.6 337.7 1,11 


( ; “tS aes AMEN = “4786. 0 2” “SEG73 “QFSEQ"= “2.9727 EPA = 35.465 


PA/SEGV= 5.5-8. 6.-13. b Bal alah 25.-50. 50.-100. r 5. 5-109. 
- TF. 35S «DST CoNH 0127 . 7706 ol 8957 e12l 427% 2053 LDH H293 2148 
€'s SM T1764 5624 10366 27.647 FLL OT 2747 272 6182 1.7960 .090 16.66 1362? 2212 


i TU 2719 278 e7 GUNG 12.3 P76 47H GI167? 1214 17.75 1.644 93.4 175.0 1,29 


» 


9H 35.79 5609 13.73 16d3 276574 .397 14374 .197 .4097 .066 Go% P.013H 154 
U 128.9 [2.2 9%896 Be71 276A 2654 IMAG 1.07 7.296 6429 26.2 15.95 .f84 


¢ —t = T.eS “HMIN = T3Ci." B= e17397 S7PEN = 3.51465 EPA = 32.76 
|, PASERY= 5.5-8, 8.-13. 13.-75. 25.-50. 50.-190. T 5.S5-1200. 
git perekene at’ . (oa a>  — “WENA OUCT WULED ott tee wings ees 
“ 90 173.7 5.05 59.87 1.92 16.77 .683 3.444 .705 1.597 .939 11.6 11.03 .192 ; 
wo OD TT2LS 27 .S HN7 62 Go1G 12469 Fo17 34075 L218 13 2H S17 “72.6 85534°.950 
( _—= Ts MIN = "95?, B= e19L4 “ATBEN = %.R746 ENO =~ INST 
« PASEGY= 5.58. Berit. 1%.275. 26.°50. ®0.-100. T 5eS5-10%96 
* eLG7Y .1G7 .YG7L L0G oh e19G5 112 
( a 90 11%.4 9.33 35.29 2.394 "578 .9%F 2,868 459 .9559 . 187 Poh 7.759 45 
» TW Y2ta 59.5 aie 25606 25 207U 4382 6803” He2° 67.%8 2639 
» U = T.€5 HHIN = 868. S= 1972 BREN = %.9725 EQPA =~” 30.11 ~ 
PA/TGV= 5.5-8. 6.-1%. 13.-75. 252-50. 50.-100. T 5.5-100. 
: ih A a a TT ELT Le Ce TCR ae a ee Re EE 
« 90 66.71 6.99 42.69 3.22 B257O 1.615 16912 «375 «5147 1138 202 Ge%13 233K | 
a U ZUTL 136 F VUZE FLUG PLL77 1.7% 6.981 6195 16466 34.5 1.26 
( Z , oF N= “T42e “s~ 2074 FAV BET = 4.2377” EQFA =~ 29,N8 
a PASEGY= 5,598, 6.-13. 13.-75. 254-50. 59,-190. T 55-190. 
” Teo 
( « 90 Bh.12 4eAS 11-93 7685 2676 1.7 1,691 2353 1.929 1198 1.8 3.631 .2€0 
es UV GN6.4 S603 133.5 13.9 32.44 4672 eee 7.338 1.07 ~““@.? 32031 167 ~ 
4 ° aE 6395-8 = "52167 ~P/REQ = GL2637 EQPA = 28.97 
» PALEGY= 5.5-F. 8-13. 13.-75. 256-506 50.-100. T 5eS-100. 
¢ ‘ 0 S049 4.97 136NS 1.55 16379 .460 16949 «268 «6616 1156 3.0 3.2946 .207 
a S887 250 1bh eS It 15.54 1.6% 5.161 4645 ~14.0°3%.97 1.30 - 
( = 18s TIN = 567, 8 = > 42743 B7HFN = 4.5165 FPA = 2%.06 
» PAsEGV= & 6-6, 8.-13. 172-75. 25.-50. 50.-1n0. T 55-1908 
* ooo oNt7 SeX .OIN2 WOLN 


” 


er re 


( 


0. 


* — setetuTTe S73-%, 7 ENERGY SPECTRUM LISTING 


rein 3 1.84 HMIN = &55. P = 2325 RV BEN 
CASEGY= 5,5-f, 6.-13. 13.°25. 25.-50. 
eS ee ee ee ee eee oe 


ON 9.644 1.47 3.971 2.764 27149 1770 27647 2.150 
0 BBL30 26274 32087 3.52 Ro77G 1615 4.396 260% 


= &.6A44 ENPA = 77,58 
5.-109, T 525-190. 
eaeiaeMatI > Ad 2 Iie 
»%125 .076 Ge 29969 .099 
2.570 .%26 36.5 7.575 .399 


“Te “teh were = rsh. Bs 02429 PVAEN = 4.9395 ENPR = 26.60 
PA/=GY= 5,58. 8.-13. ¥Ww-25. 252-506 50.-198. T 5.5-109. 
4 


3M 5.887 7,08 1,656 .551 .6127 2.217 .0890 .069 
~—~T 76633 5.90 19.13 3.55 = 


27206 .9646 Ze 243K" .O71 
a ~~" R 4.277H J B11 


t 2 ~4.8* WHTN = ~ 229. B= e2506 8FQ = 4.0253 ENPA = 26,78 
PASERY= 5.528, 8.-1%. 1%.-75. 25.-50. 50.-1N0. T 5.5-190; 
’ Se Sa ee ee ee” ee a ee ee 
30 114.91 .68@1 .0613 027 5.9 4116 1.179 
ct Lge: jae 69.77 3.07 09935 .249 27.8 19.17 1781 
fone a T.P°S WMIN = 1284, 8 = 42571 &/39FN = 5.2385 EPA = 25,51 — 
PAs/EGY= 5.5-8, ®.-1%, 13.-75. 252-50. 5 06-190, T 5.5100. 
. 
, on 2245 .017 5.9 .0156 .011 
SSeS) ee 4 “26158 2233 27268 2101 32.6 22827 2132 ~ 
* if 
,) Le E05 WIN = —— 4." B= 3882 REN se GL S3te EWR = eS,22°° 
~ ONSEGY= 5.5-8. Be-18. 13.°-75. 252-50. ©0.-100. T 5.5-100. 
” 7 i 1Gy8 
- gn 957-5 96-4 28.6 136-5 14-4 
Se eer S0ss SEL ts: 7 a oes 
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a NT A OPTRA a eae Pa 


——~SBTECLITE S73-3.  ENEPGY SPECTRUM LISTING 


a 


6.37 aes “4.98 4HMIN = 607%. Ge e947? S/BEN = 1.1864 FPA = 66.65 
PA/TGY= 5.5-8. 8.-13%, 1%.-25. 25.-50. 59,.-190. T 5e5-10N. 

i << -) LL GC Sen uae. SD eee Ca ieee rea Oe Cae Skee 

fo. 98 1722 50.3 D165 1762 176.4 Se4P 23,09 1.39 1.2 197.4 1.437 

ile Bit Peg 9 125 5 6.76 73.66 1.85 3.8 111.6 &.75 
Ce Tee “ffs BEN > 45680, % = 20602 */BEQ = 1.4235 ENPA = 56.35 
| PA/ESY= 5.59%. &.-13, 13.-25. 25.-50. £0.-100. T 3eS5-100. 

~~ F TA7e5 Fe3L 26065 6783 14.07 4X51 2.826 2114 2.908% 2044 33.6 7.916 299K” 

€ AN 7137 9,08 344.7 2.51 173.8 Lo17 29.670 2 2P% 475K 1.100 38.0 115.9 .729 

; »  O-18F83 47.9 3051 17.8 1416 6694 162.5 1.41 31.09 «441 237.8 997.5 1.72 
> ct ©, hee Meee = SERS. Boe 20805 8/BEQ = 1.90995 EPA = GA.S0 
CO/EGY= 5.5-8. @.-1%, 13.-25. 25.-50. 50.-190. T 5.5-10°. 


764. °U L259 Ge865 2559 56119 2° *6 20004 Vill 1.6589 L043 25.8 BLSIS LOF1~ 
, 9M 1449 7.49 270.6 2.23 129.7 6929 114.37 6197 2.074 2057 42.8 63.34 2251 
9712995 -GN.3 ~ 2633 17.8 119F 5.61 83.07 1.02 11.73 «264 231.6 662.6 1.48 


(0 TTETE TOA ON MNIN = 7645, R= BLAH BVNFC = 2.6690 ENPA = —37.74 
PA/EGY= 5.5-3. 8 o-13, 17-25. 285-50. 60.100. =T 5.5-198. 
PTET GIT LLG LS 1s ALT 82s 3298 29-22 SIS ST 
ce kee ATi. 3 7.3L 172.2 1.90 0.70 .754 3.731 017%? -91123 2.045 Wh *7247 1215 
“R701 3769 1646 1163 577.8 We % 22,46 50° 5.74? 1217 14208 BURA 1.70 
¢ Cs § .95 “Hatwe 1776. 3s 01528 A79NFEN = 3.8130 EPA = BL.74 
. _PASERY? 565-8. Beet 8, 13.-25. 284-50, ©0.-100, fT 545-400, 
nF TNTE ENT SSE ee 67S LEG SITE ORT Sa 8 2557 SIRE 
C2 89 336.5 7.39 97655 2.82 17.07 .BAG 26741 2260 25279 20S 862 19615 2293 
02798 3G, 5-7NFe 1269-15569 We 3T 18.90 1606 HAIR 136K SOL8 141.0 1.86 
: C Te°4HMIN =~ “125A. B => VA1799~ R7AEN = &,2775 ENPA = 279510 
” phveGve 565-8. Ben43, 136-25. 2&0. 506-109. = T 50S - 200, 
; SLIST— NS 07 25-5 0 POOF BT SST TS 
7 gn 395.1 5.75 52.92 1.56 16h 6526 2.016 Et 16952 2059 13.6 19.96 2178 
TROT 76 SMUT AMS ALG Sel ARS CU BIE GUSA INE BPLG ONT LT 
€ ss J =... 2296 THIN = 355,; es “el SEL 7 BEN SLPS Eek = 274? 
7 PAVESY! 565-8.  Be=43. $7.225. 28e050e S0sr100. | T Sed4 40s 
i 90 137.7 8.27? 78.972 2.66 4.902 1673 20059 2.559 .7°9R 1091 So? Ve7RL W371 
—T88FE HIS 18D T 128 1662 ToS LLe9T 1646 3.580 589 16.9 45.65 1.50 
CET e892. eee BED se, ABIL NPA = 25,97 
PA/EGY= 5.5-8. —&s-13, 130-25. 254-5%, 506-100, = TS65- 490, 
«90 89671 666% 46657 3638 Heb? .©83 .7HU7 6150 42819 959 62 GREE 2293 
— 35 S208 ASS AUS ASS 2.032 BAU “16. 051.79 1.58 
SSI 9G, = 206 ~PPRED = 5.0615 ENPA = ~ 76.65 
w PA/EGYs S.5-P, Ae 13, 13276. 254-50. 806-109. = T 545-100. 
» : 1.G 
oe ae RTH 1.16 a? 23H .67H 
992787 GEST 2967 26619 669K OR OT TLR” 366° 26410 2627 + 
(TCE ee aN SN, 62198 --R7RED = 56.2295 ENPA = -25,93 
‘ » PAVEGYS 5.5-", Be = 13. 13-28 750250, 89-100, oT 52199, 
Sata ee a a eS a ae ee Se LE i Et sere a 
( . 99 60679 6646 5.187 1.98 3,37M 1602 1.029 6275 61225 2055 1.8 2.577 «236 
e276 THN 100. AME ZL 3,02 5,582 Lo12 1.572 16% 1TH 17.72 1.92 
( Scape dese é 
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SATELLITE S73-%.  ENFPEGY SPFCTRPIIM LISTING 


O “tT = "9 a& “HMIN = 547, A= 22780 B/AFQ = 5.3331 ENPA = 25.55 
PASCOEY= 


565-8. 8.-13. 13.°25. 254-50. 50. -109. T 5. 5=1096 
Sg ree oa ee a Se ed 
90 22,96 4.93 11.76 1.70 3.573 2735 22941 120 202 1.892 .173 | 
re TH e94 4.85 16742 6714 oH7S4 6251 ©.8 8.077 1,07 | 
(+L ET 1.06 HNTN = 447, B= 4.2363 S/9EN = 5.5539 EQPA = 25.11 | 

PAVEGYS 55-8, Re-13, 1%.-25. 254-50. 54.-100. T 55-109. 
BT EP eer eee ee Sipgate ae ees Cod... Rare SE 

( 99 21618 2457 96139 6980 1.10% 1260 . 4612 .18M 757% 6097 be2 1.6760 «128 


V°167.9 164.6 F194 6.25 8.151 1.4H 2,907 25981 1.225 1.262 2460 9°87 6557 


OSs “Be8S RAL 349, B= o2443 B/BEDQ = S.7677 EQPA = 246.51 


PA/SEGSY= 5.5=3. 6.-1%. 13.-75, 2£.-S0. =0.-100. T 5-5-1095. 
ennai Seed hoe a 
¢ °0 1-593 .642 .3064 6153 .1176 2159 1.14714 2.042 4.2 .-3057 957 ie 


O°1G.51 GFK 15615 BMF 7.475 1.42 16742 2503 1.179 «377 20.3 3.235 .t4P 


¢ Gs), S686. “HNIN = 2Sie 3 = 32549 B/SEQ = 6.1114 EQPA = ~°23.36 
PA/TGY= 5.5-8. a.-13. Ley 256 ?5.-50. 59.-109. T 5.5170. 
er Se race, yaa eres 
a 90 «585? .616 61471 0460 2768 «1112 «379 
WN & e147 2.39 1.152 .576 «7573 23ND 242TH 171° 21.65 «7455 2163 


; C= ¥.96 “HMIN = 139. AR = ~ 32624  B/AFT = 6.0997 ENP = 23.87" 


« PASEGV= 5.593, @.-13. 13.-25. 252-50. 50.-190. tT Se5-1196 
RFE a ne Fe eee ee ae ee ee ae 

€ gn 60719 20186 206 29299 .021 
Sy eee a SIS OST IEE ONES CHES 

ee OE Le 2 8 = V321e A7REM = 7K tay EQOR = Ty 
« _PASEGY= 5.5-8- &.-13. 1%.-25. 25-50. 59.-190. T 5.5-100. 
Ne eee ge ee ee ag ee 

eR 20 420-5 &2-4 79.0 134-5 13-4 


o Y.16A8 21467 ag 04025 6059 20326 . 02% 69164 612 176.0 . OUT 2012 


S—SATFILTTE S73-%, ENEPGY SPECTRUM LISTING 


» kee ateLe, MENS A224, = 09492 S/FAEN = 1.5028 ENPA = 54.55 
PASEGY= 55-8, @.-13, 13.-25. 25-506 50.-100,. T 5.5-109. 
, oo FT 66 7 UTS 1LIe 71-1570 13.60 CALE-7 STA S131 619619 OGM 11.6 95119 21K 
90 1670 12.6 273.1 3.42 114463 1651 17208 245d G1BA -142% 14.2 79.2F .4H3 
——~D-Lt7F7 69,0 1859 18.0 394.0 7638 163-1 2.40 37,391 414 94.9 FUL.9 2.42 
ate Se 2.09 HMIN = 455%. R= 00634 S/REQ = 1.8687 FPA = 47.11 
» PASEGY= 5.5<3, &.-13. 13.-?75. 25.-50. 59.-10". T 525-190, 
FSR 6F 1.68 17.98 wuht A976 21 AL 2 B363 2043 21591 M1 66.66 Ge73N 053 
99 1397 5.%8 1868.9 1.75 10%.7 .641 14.07 2170 2.439 .048 74.58 43.46 -.182 
Q LLP AS 2727 1553 6.95 912.0 Seb 121.1 0877 20.36 1.256 467.6 555.8% 1.369 


» UCU = 2.99 HMTN =~ 2559, 9 = 00852 NAFN = 2.6861 EQPA = 39. 7A 
OB/EGV= 5.58, B.-13. 1%.-25. 25-51. 5N.-100, t Se5-1106 
© GRIT TST TF.4G G78 F982 6166 .S555H OG L087 2014 36.4 25554 052° 
90 1F01 5.37 160.3 1.52 AS.51 «703 6536 «13% «7015 NS? 51.6 42032 0191 
“T3424 29,6 1369 8.17? 743.9 3.98 UONS 2692 5.798 .167 2799.8 4A. 1.95 


« 2, _€s09, HRENSS 26467, 8 = ell 62 PF7RED = 3.3955 ENP A = 32.87 
OASESY= 5.88. 6.-13. 13-25. 25.-5". 50.-109,. ¥ 525-190. 
~~ 7 FeGUS oFUS SeL3L .c3t .7BIS oP IL .SUGY NG 2.0528 .01t 300 25751 .N26— 

9% 660.1 485 11962 1.57 44.68 .595 1.876 . 085 21961 6.919 39.6 73.54 2171 
~~ O BDN? 26.6.9 1126 8.39 33066 %.14 12.26 6390 1.9271 2109 24.2% 27%.% .9K5 


~ c=.  selro HBINCS 1745. B= 01584  B/RFO = &.5690 ENAPA = 27.89 
PA/EGRV= 5,5 8.-13. 13.-25. 2547506 50.-100. T 525-190, 
a ce ee er re V2 -SOG TD GS ISG 018 2k SOU? VIZ 
90 709.5 6644 65.39 2.46 19. 097M 1.176 6179 21261 086 8.4% 15249 .?77H 
a YT 206 FT GN 6 7476! ei Sey Gel2 11.09 2°99? 1.764.226 S1.9 141.0 1.46 


» b= cel, VAIN =, 1230, B=") ele?" B7REN T= Sabres EQea = os | 
a PR/EGV= 5.5-?P, &.-13. ESysFh% 25 0-506 50.-100. 2 5eS-1N0, 

° a 6 _ 4 a. te OD” Oe SO a We Ser ae ee | 
* 90 163.3 4A S3.26 1.79 7.U9F 1.291 .8007 .081 1.1211 1.173 14.2 6.670 1135 
~~ W FIeT 14.35 355.2 7.70 72.50 202k FebGbS 1525 1.172 ©1k? 87.4 61.49 .7%5 


” t= 3.04 ARMIN = 943. R= “eonOi BEEN = G.E472  EQPA = 26.4% 

o PASESY= S.S5-4, 8.-13, L3er250 25.750. 50.-19%. T 55-110. 

“ Sao “ur eR eS a 
“ O0 177.L 7o22 504? 7608 Ge 749 oSA7 06773 2125 60735 2942 52 7.%71 2243 
» UO IL87 3369 S35.6 17.1 SecAl 3.22 4.307 6275 7959 .193 31.4 57.30 1.18 


er eee eee Sense F786 Oe Gel tis“ Ese aS — 7 s8s 
OR/ThY= 5.5=%, e.-13. 13.°-75. 254-50. 57.°100. hg 5-5-1196 
. 7 ous sue7CCCSSSS”:C OW, «Ce ee, 


« 9 98.77 Go92 Wed 1695 26451 6388 67353 6190 61724 2144 5.0 5.610 .799 
* TOUL7.S 30.3 L984 FRY 20087 2.02 3.175 2537 L113 ~232°> 30.4 37.59 1976 


. et ee w= e2i7t B7 REO = 6.4570 EQPA = 23.1% | 
» PASEGY= 5.5-%, 8.71%. 13.775. 250-50. 59.-10N. T Se5-10", | 
= 2.0 

° 90 79.62 4.09 21.98 1.61 36776 «436 .5147 2097 60919 .N2E 7.0 %.679 «143 
“ U7. 7% ANF LGR? S617 2PHC7TS 1699 Be5UN 6501 ©7783 .1566 42.2 37.46 .759 


WS57.1 27.7 L260 F600 19.65 2636 16979 «Sil .4A%B .18% 21.0 23.77 «931 


ms C= 2.13 HMIN =~ 651. RF = 27255" S785 = 6.9566 FOPA = 22,78 

« PASEGY= S598, 6.-13. 13.-25. 254-50. 5.-100. T 5.8-100. 
Sa Eg A ETN ES Se RT a ay cy Se 
« O0 6.71 B10 92059 1649 768659 6540 27357 087 7.6 1.545 «129 


ap a a 


" “SATELLITE “S73-3, 


ENERGY SPECTPUM LISTING ~~ ~~ 
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“S208 HTM = 569. B= +2329 8/7PEQ = 6.6985 ENPD = 22.7% 
PA/JEGY= 55-8, 8.-13. 1%.-25, 256-5", &9,.-10%, T %.S-100. 
af ee oF iene Koo a ee 

QM U7L7F G19 196765 7eM% 16949 oe 44S .77NG 6127 .7F9H 081 268 7.799 1196 
“MN RGRL7 7P7,7% 65.34 9.23 12689 7070 2.903 «70K 1.6708 «382 15.h LIT .PAT 
us Ske” URIN = B51. 8 = “224620 B/9FEN = 7.1631 EPA = 21.37 
_ ONSEGY= 5.5<R, 8.-13, 1%.-75, 25.°5%.6 50.-10%, T 65-1190. 
em ae ae ee ee en ee 
© 13.74 2655 S.H1% 1.55 L,F3"% 6336 21133 206% 60735 .042 3.4 19758 2107 
TT O10 F TT 11.9 64.059 6.85 10.82 1.86 2,770 61% 05576 6226 18.8 8.954% .392 
Es 206k RAEN = 350. R= e244 «P87 OFQ =~ 7.1252 ENPA => 74,90 
PAsChy= 5,nH-P, 8.-13, 13.-75. 25.-50. 50.-190. T 5.5-100. 
tl eee fa ho SRN emt tat oh Leo wat gy 
90 3.722 1.%9 2.590 .604 ©1361 .09¢ 2.036% .137 3.2 3847 .087 
“2 59.06 9.18 29.32 3.84 ~"$e319 2417 65273 197 16.4 3.934 1424 
ao ay: 2.08 HMIN = 244, A= o2571 B/REN = 7, 7°%* EQPH = 24.53 
PA/ERVS 5.5=8, Be-1%. 13.-?5. 254-556 59-10%. T 56.5100. 
a yA a as SS a ee ae a Oe Ee ee eek he 
90 2.451 1.19 «7353 1329 061% .0A1 o 1471 6074 21173 2012 =H & 0 1353 2034 
ne 7.567 2.09 1.625 2.615 677257 «296 o1714 1105 19.8 1.125 6299 
TS 0 OHM IN = 145, R= ~.2667 A/BEN = 7.7485 EQPAR =~ 24.05 — 
PA/CEY= 54Fab, R713. 13-25. 25.-5"%, ©9.-100. T 5.5100. 
e* 
* ag 20210 6021 0.9794 .021 66% .0195 .011 
ed ai “——S1569 111 01177 .068 6.7 L061 047 
obs er MIN = == We Te wRN26 “R79EN =" 9, 78°F EQPA =~ 18,65 
. PASEGY= 5.5-R. R.-13. 13.°25. 25 .-50. 50.-100, T 55-100. 
eh Mee ees en ee GER CORE gn rs a oie 7) ae ae Ree Re ene 
90 B6.N6 .475 555-5 28-4 56.4 27.61 1125 
= Wee et, ~ = =———"995.5 1.6% 20438 TOL4 333.6 7553. HIT 


( [SATELLITE §73-3.  ENE2GY SPECT2UM LISTING 
047 763 2.30 HNIN = 6426. =F 00492 ASRENM = 1.9703 FPA = 4ANZ 
PA/EGY= 5.5=8 A.-1%. 1%.-25. 2" ,-50. 50.-100. T G.5-100. 
. FBG, 58 2.95 12.560 .786 5.396 239 27996 .0AF 0775 201A” 16.5 4.005 1197 
i— SN 849.7 FMF 20,78 1,57 S107 2791 9695M 2788 274755 2096 22.8 79,77 .269 
TW BDAL Ghod B7ALS 8695 GLA 471 83675 1.44 17.89 1459 122.7 335.5 1.45 
¢ . koe eee) SEN = 4697. 8 = 20645 ASPEN = 2.4983 FPA = 9,25 
PA/EGY= 5.5-%, ®.-1%. 13.775. 25.-50, 59.-10%. T §5.5-100. 
WT FTRTD LCST TG 727 32956 616 SPOTL Ee ONZE OMT H2-6-° 594° 2.962 14 
( OM TORAH Fe5% 7T0eAD 1931 4OL7%Sd 0459 7eKB52 6125 161499 6077 G8.2 %3.55 with | 
— WR2FZ PLN B2L9 47S LLE.E 2647 64.47 .671 9.915 0136 409.8% 273.1 .715 
—E, = 2s 8), PATE Wii. R= 00912 R7PEQ = 4.5507 CPA = 37.95 
PA/EGY= §,5-8, 8.-1%. 13.-25. 25.-50. 50.-100. T 5.5-1090, 
TTI TT SDS RGN TGA DES TV TSCR OSM G45 32-4 37.0 120 M1. OSS 
( 39 S704 453 60.8F 1976 79.07 6527 26724 0096 27502 «07H 4169 72.17 1144 
, S25 3-26.83 SSH 5681 W72,.T 3.702 22,02 6515 7.12 2130 246.665 726.4 2343 
( >» UC = 826 “MMIN S-— 2664, “SS ""G1213~ B/AEN = 4.6298 E9P A = 27.489 
PA/EGY= 5.5-8, @.-17. 1%.-25. 252-5%, ©£0.-10%. T 5.5-199, 
———F {to 45 1 t8 [. 36h 2265 A657 .0°R C209? . GY 0°95 2011 T3579 .439R 102d 
AN UPS Ge72 SSe17 1650 79.7% o732 03478 NSH 0539 .016 17.8 21.77 2218 
~ 96152 %2.8 549.9 8.6% 295,38 %e4t WHS oF20 214% .0GH 106.4 1569.5 1.147 
cS,  arkeee  uRcN = 169%, = e16%H A/JREN = 6.3435 ENQPA = 23.33 
. PRSEGY= 55-5, 8.-1%. 13.-75. 25.-59, 59.-109. T 565-190, 
, IS BeSTS Lol? AGUS 797 .UAaTS 206? .06 7D "RR UPL 0LS Ved «2557 01 38 
Ge 20 202%.7 9.8% 51.96 3.57 7.568 «741 1.3579 212 &.? S671 629% 
» 9297 S007 SEUCL 15.2 73.62 440 2.3903 25973 = —" ot KS, 27-1. 69 
- Uk = eae RINE = f28 45-8 = 01931 8/BEQ = 7.2929 “EVR = — 29.73 
. PASEGY= 55-8, 8.-13. 1%.-25. 2&.-50. ©0.-100. T 5.5-199. 
. ln SET oe eS See. a ae er ee 
es 9M 162.64 5.15 31670 1631 6.182 .616 .197P 082 2.0245 .925 5.6 9.712 .250 
eT FEB VG SAV RIT207 410% 34.64 Fo4L LoSSL C34? .U5H2 6138 Wee FI1.45 1.7% 
( » = 2e%f_ AMIN = 956.3 = "37086 P/BFO = 8.2606 ENPA = ~— 29.39 
PA/SEGY= 5,f-P, a.-13. 13.-75. 25.-50. Sn.-190. T 5.5-41N09, 
_Soegetetatarecot> oS ee ee ee eet eee wie 
” Of 98,53 5.38 32072 2.590 16915 oF 71 1474 2D74 .N%H3 N26 5.4 Ue7HL 0195 
a DOGS G27? 2L2F 9. 19.87 1.685 9391 . 283 268% 6192 35.2 UIT 2978 
Bini , « & = °,Ceov AMIN = “8X, OS <erav” Sv RED = 7.9565 EnPa = 7U.77 
« PASEGY= 5.52P, 8.-13. 13.-25. 25.-5N. S0.-10. ¥ 5.5-100. | 
r ae te A ae oe ean 
€ = 90 13h. the2 270015 1672 2.528 .4GN 2431 137 3.2 3.783 2209 
° 0 i023 GT.* 066.8 44,9 ~~ 709 2 726 22561 11GB 1359 52.40 1.76 
( « C2 £000 HAIN = °&x&6, RS 2231 S73EQ = 8.5499 ENPA = On .00 - 
«  PAZEGY= 5.5-°%, B.-1*, 13.-75. 25.-50. 59.-109. T S.S-190, | 
| 


99 51.96 5.95 1Fe1R 3645 7%, 29% .593 21471 2104 .0768 037 2.09 2.849 1.235 | 
W37HL3 2369 BZeSN V69H RL27H 1.62 LoOLG 6H 77972 1137 19.2 15.56 7A | 


t= 2e25 UWIN =~ hU7, “R= ~ 2315 “37BEG = A.AIS9 ENPA = 19.65 
OA/EBY= 5,5-8, B.-1t. 13.-25. 25.-50. 59.-10", T S.5-100. 
ph tae BER ee ee EE TO OE Le” pel ee ee ee 


* 99 41.76 3.37 10.29 .947 .919% ,1PFAR .1050 2067 .0745 .017 7.5 7.526 114 
eo OSL TSF ATI GF GES 69G 1065" 1.76 26UNS £753 .%7PKK 0199 3e68 19.699 1.579 4 
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.— SATFLLTTE S73=3,. ENS OGY SFECTPUM LISTING 


CT 2.2 MNT = 556. B= .7KOe BVRED = 9,632 EDPA = tPQaR 
CALEGY= 565-7. Be 18, PRP AK FD. TD ae8O%, = T «Sy SH 


oa ‘- i a oe ee 


3D H,12 4.93 A3F3 1.01 1.17% 2245 .059F 2NKU2 69123 6912 2 «=e & 1.542 1105 | 

ors 6 726.9 13.7 62.69 5.02 7.470 te1% 2.392% 0175 20785 .055 6.6 19.53 .479 
~"t 2 S28” AeTa = 446. Be 22593 PSIEN = 9.8716 ENA = 18.56 
PASTGY= 5,5-8, 8.-13. 12.775, 25.-50, 59.-100, T 5.57190, 
HE TO DR ny 

90 41.91 5.55 4.657 1.07 1537 .153 2.7 1.07M 122 

TW TSNLD 1701 28.12 5.08 BL159 1.75 21708 2471 27561 6149 1662 5.87A ,578 


| 

f 
, 
[ 
ft 


Moe es 2.27 WMIN = 329, 938 02569 B/ZRES = 9,63"84 EQPA = “18,73 > 
PASEGY= 5.5-Pe 6.-13. 13.°25. 25.-50. 59. -10%. rt 5.5-194, 
> ee 


sR tle 
e { 

( 30 7.353 1.98 2.206 .901 «3064 6217 .1471 0147 1.9% .5137 .196 © 
Be: ae aa 3.299 1.35 «7257 41S .1319 .1%2 6.3 1.125 saan 


( “t= 2.%3) HMTN =” 760 Ss ©2662 E8/8FC = 10.7747 ENPA = 17,74 q 2 
PASEGY= 5.5-%, @.-13. 1%.-25. 25.750. S0.-199, ¥ 55-100, 
a. eee Eo ee ee eet I Ee ere 
1.9 
\<> ae D 2775 3.23 1,451 1.65 man) 5 5 ar | 7% 2251 1907 
( ; —t = 2.26 HHIN = “231. A = 02726) «6B BED = 10.1195 EPA = ~{8,32 
PA/ESY= 5.5-5. A.-13. 1%.-25. 25.750. S8.-109, T 55-19", 
= gee eG Oe Se ee ee ee ee eS ae re 
. 90 262 
Daa. See ae a. ae “eo 2233 .158 8.2 ,£673 132 | 


€ . UC 2.29 WMIN =~ ge Be LB BRED “AZAEQ = 13.3851 EQPSA = 15085 74 
PASEGY= &.5=-8, 8.-13, 13.-25. 25.-59, 50.-108, T 5.5-100. 

= aa. A eae ease CRE 3254 T20=5 12-4 

ran 90 .0763 .976 12.97 .Ph7 7UB-S5 43-4 396-5 22-4 5364 16436 1933 

— Fs °° ° °°» °°...  , Gs Su 5694 0752. 027 ,6°S6 014 316.6 S.1Se tie 


7 @s8 €@ 


? @& 6<s 
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| AREAS TORS abe 


i SATELLIT™ S73=3. ENERGY STEFTTUM LISTING 


“te SeSh WAL a F4bL, 8 = 29519 PFREN = 2.6136 ETA = 3°21 
PASEGY= 5.5-8, A.-13, 13.-25, 25.-50. 50.°11%. T 5.57190. 
TTT ROT Le? RO RRE GAG BLAST 192 F7B2G S037 HST L010 2666 16991 954% 


AN BUR. Herd 23.98 2779 13633 oh37 |OO16 2147 27692 2.947 2f.0 13.0 .175 
. os ND S12T 75.9 172.7 3.82 thE. 2626 32.90 6741 5.737 «227 177%.8 121.2 «732 


7S . pac eF_HEEN (= 475%, 28 01668 PFREN = J.37f1 EVA = Bt. 75 
PASEGY= 5.5=%, R.-13, 13.-?5, 254-506 50.-199. T 525-10%. 
PSR TLS GL2M8 957 TL9GR 19S V17%8 L027 20286 65-4 GFL 1.495 2034 

9 325.6 2.95 76.96 .58F 18.52 2810 2.702 .NF2 .3971 .123 5665 13.10 .995 
“WREST L665 270.8 3.07 165.4 1.71 22.71 2437 2.132 116 338.2 122.4 13527 


(Sb HMT N= 35669, 8 = NABH AVRER = 4.8226 FIED = 27,77 


PA/SESY= &,5-8, &.-13. {7.925. 2©.-50. 50.-108. r 5.5-100. 
7 TG7S ABT LLRSS W214 PROT NSE CISLB LN2H Ce OIGL AY-4 78S 2 718G OF 
90 27604 3.51 75.2% ~POL AFLP® 6677 1.244 .172 .OFO7 .N1% 3%.6 19.7h 2112 


praer VY 2PUS5T 18.6 268.9 7S 159.5 7,19 8.573 «749 W7EVS 2N75 201.6% 172.3 .f24 


“Ee ee eo RNIN = 2671. 3 = 01255 RZBEN = 6.2278 EWA = 23.63 
PA/TGY= 5,5=8, 8.-13. 13.-75. 252-56 50.-100. ¥ 525-109. 
7 S.UTT PEF CAGSR LPNs OL Se OLS Bier OLS 72H 2 220T 3G 


OM 251.1 Selh 25.7% 1,38 114.51 .537 23046 1.057 1727 01h 11.8 19.50 1.187 
~  O 2669 %3.9 273.7 7.94 9.39 2.94 5.806 .517 61340 .955 67.6 39.80 1.05 


“eles 2.50” HMIN = 1550. B= el7RS SPCREC = “GeTNGe EWA = 19.41 
PAZEGV= 5.5=-8, 6.-13, 13.+75,. 25.-50. ©£9.-10%. T 5.57100. 
<a RE eee AR ee ee eee ~ * 26 LST NGS 

90 170.1 9678 19.12 2.65 6,136 «79 .1K671 0194 2.0 5.019 .312 
“TW L16G°57.6 187.1 17.6 26.77 3,37 1.847 BSF 1".2 47.091 1.78 
eS 2.69 HMIN = 1359. = e18S52 3/RFO = 9.3980 FEIPA = 19.04 

PRSEGV= 5.5=-% &8.-13. 13.-25. 25.-5%, 50.-105. T 5-25-1000. 
. 7 7 oe es i cal pe ae, i a 


90 378,5% 6607 19.43 1.99 1,633 . 775 . 0450 U9 21265 . N25 3.5 4.327% 2716 
— -& G36,7 38.6 167.3 1103 1389 2.09 2H5%% 6265 01528 2198 18.8 34.35 1.13 


“ts (tear SMTi = 9°99. B= e2142 E/REN = 1923220 ENPA = 16.13 > 


PA/EGY= 5,€=3. &.-1%. 13.25. 24-50, 59.-100. T 5.5-100. 
Sr ae Oe ee ee a - maee ———— ee ee 1.7 
QM &PLST 8.45 09991 2375 .05cB .NH2 69147 1015 2.6 2.6235 .097 
W722.0 19.5 76.8% 8.10 8.69% 1.81 29071 2405 {752 16.67.3916 
CS INS 855 BE 2238 PTE = 11.2920 EWA 2 17. 3r 
PASEGY= 5.5=8. B.-1% 1%.-258, 254-50. 50.-10%. T 5.5-190. | 
9M S%™.36 WS 4.902 oH3X .HO7Q 17H NIN O21 668 1.377 1194 
TEI ST -2STE OW BSH MT LOM PUTS C171 DUR 6048 22,8 72.38.7246 | 
SET tS 7 EN = T8661 «EPA -= - 17518 -—| 
PA/EGY= 5.€=8, @.-13. 17.<26, 254-504 50.-100. T S.5=180, 
————_—_—__—e—ess nm _=__——_——— Se 
9M &%L38 5655 6.61% 1.56 1.532 .4Ru 2.0 1.697 191 
ee : 7 . “1.46°- = { 
Tb RATS BUTS OR S292 PF PEM = 11,5331 EIPA = ~ 17," 
PAVEGY= 55-8. Ae-1?. 1%.-25. 25.-50. ©0.-100. T 5,5-100. 
Qn %.5h 5.14 20735 .974 .0%68 O%7 1.7 1.599 .227 
TINT TTS LEE GIG B. NGA 1.91 65896 .4it LG RIA 


221 


( * SATFLLVTE S7T3-%.  ENEPGY SFECTSUM LISTING ~ beta ae | 
(@) » Le 2068 MTN = S43, f= 02470) «S7FPEC = 12.1519 ENPA = 16.57 
; PASESY= S.5-8, 8.-1%. 13--75.6 25.+50. 50.-100. T 5.357100. 

‘ . 7 ie Pee Eee Sy ee ee ee ay eS ee ae 
¢ OM 31.76 %.06 3.493 867 .3064 .108 .TH9N 1049 69134 1918 5e5 1.034 .NAR7 


“0 787.7 1763 4PL2H &. tH 1.756 «585 «3746 6187 2.0907 .064 3066 9.456 .458 


( oon a tae i ee &S54. R= 02555 B/3EN = 12.7581 EPA = 16,25 
PA/EGY= 5,8-3, B.-1% 13.-?5. 25.-59, ©.-100. T &,&-190, 
eo $$$ 9 sig 
ON 6.417 .92h %431 2668 .0613 2061 .0245 .025 Jeu .4101 1946 
oT AGO 8505 15.60 2.38 .907% .%70 NTH SOUTH 39.6 3.407 .264- a 
(\..7_ Loe 7252" HME 354, 2 = 02659 P/REQ = 13.7619 EPA =~ 15.55 
PA/SEGY= 5,5-8, 8.-1%. 1%.-75. 25.-59, 50.-109. T 5.5-100. 
Ls ae SOK. CRT AS RES BES Eat Se a Pe ee eee ee ee ME ee eae ene 
( + 90 &e412 1.47 «3676 2768 2K 21789 1944 
~~ 030683 65 3,056 1.53 .FFR6 2450 “7660 .066 2.2 1.954 1201 
“t= 2.42 MIN =~ 209 #S=  .2767  Q/AEQ = 12.4674 “EQPA 2 16.46 
PA/EGY= &,5-9, 8.-1%, 13,.°25. 25.-57, &0.-100. ¥ _ SeSt0h. 
RS en ag a eg oa ee eee ae ee ee ier e 
90 0.9 
i . ae = 4 
4 Se et MINS 167, 3: 2815) B/BEN = 4uT379H ENQPA = 15.23 
PA/EGY= &.5=9, 8.-13. 12.°?5. 25.-5%. 50.-109, T  SeS-129— 
So ee Ce Lae a> ——— ial ok 
Cos 20 4.2 
-  SSESHR T.6S 7 8.3 .0873 .087 


. _PASEGY? 6.698, f.-17. 1%275. 256-50. 4 100 T 5.5-109¢ 
yn 

e a. ae 44.0 
163389 7196 7 sMLL7% O11 69221 O11 25766 273k By=u- 


Se Se ee ee ee ee ee ee Se | ee ee ae 


en ee eS ee a ee ee ee st a ae ee | 
| 
! 


“——SATTLLITZ S73=% ENERGY SMECTOUM LISTING 


, C= 7S GHIN'= 4529. As 09579 BFREH = 3.3472 EPA = B31 
« SASERV= 5,5-8, &.-13. 13.-25. 25-50. 59.-'01. T 5oS-190. 
———F-S7e GD Telit 2ei9U 232 .659R DEF 1773 LUS0 031% 58-4 Bau TY 028 2036 
‘ 99 147,565 2.5% 7.9R® .410 5,490 213 .7H730 LEH 01756 2013 %5,.2 5.799 ,976 
or MT LU2L6 12.8 69.86 7.09 55.63 1679 5.26% 1.270 28594 .N7"® 27,4 45.73 410 


, ES “Fv69"—“W¥IN = &7RR, B= 09692 93789 = GOR ENPA = 2F.72 
PA/EGY= 5.&-3. 8.-13. 13.-25. 25,89, 59.-10%, T 5.5-199. 
oo OLS SS oF SL Le7OS 0182S L109 OSU S16 WD 075 9155 55-4 3857 T5785 ee 
39 141.9 2.17 7.385 2.758 5,577 01499 24051 207K 2IS73 OF =H 496% 47ND .0K1 
~~ O1356 WL28 72036 1.9% S7.R7 1297 2.550 .1F3 04°SS 1.050 23N,f 47.51 381 


‘rk. ©) pero? eet] | Ser." “Fs 27968 °7REQ = 6.9°5> EPA = 73.91 
PA/TGY= 5.5-8. @.-1*. 1%.-?75.6 25.-50. 50.-199, T $.5-19F. 
, t SeWSL .O°G eSO7H elsU oN161 e016 e CSR TFT .MLTS 7§=b “19S? St76e- N19 
90 118.0 2.463 8.119 6489 % 1° 1398 2.1662 603% «0°02 .01% 26,6 4.471 1184 
SY VUGT 15.3 FELL2 F.02 29.26 1.191.978 220% . 707% .948 13hH.8 41.57 278 


Te Ss Sry War eS Sa 01267 AZPEQ = 7.9916 ENPA = 2,7? 
ORSFGY= 5.599, 8.71% 1%.-25. 25 .=<59, 59.-10%. T 5.5-110. 
ae ee GO otras a ~ wtese sues Bee -IG76 .0I6 

90 119.9 5.71 9.636 1.98 1.26% .270 21471 2067 10735 1.926 Gah 3,739 217K 
~~ O 105S PAL She12 Se27 1796 13.8 72,78 2674 24726 217H B3Se% 716.9 1.96 
Tee. 2.71 MIN = 1283. 3s 01973) 979F9 = 12,6464 EPA = 16.44 
CASESY= 5.5=%, R.-13, 13.-75. 25.°5%, 59,-109. ¥ &.5-10", 
foes i as 
QM 18.0? 2.75 6.559 .81% 1878 .1%6 20450 2.049 292465 6025 &.? «326% 1093 
DU PO6,.F5 LAS 37.95 G40 1.76% WAZ 26319 77? 21914 1105 26.9 10.30 2574 


tos C = ~"2?e68 HMIN = 07283 «87 3FN = 16.0497 ENPA = 18.47 

~ PA/TGY= &,e-%, &.-13. 17%.-75.6 25.°50. 50.-100. T e510, 
ae PAR Be ee Se a ee ee a mmel 
. 99 264.26 4e22 2.574 973 20735 .074 2.4 2.6646 2104 
» O(S3.5 16.1 16.59 41S 01935 6.196 .9S8&G .085 12.7 5.476 1587 


~ cw. Gar Wee @ rou, o 2 02396 =PNEN = 16.7157 EPA = 14.85 

. PASERV= 5.528, Beit. 13.-25. 252-506 59.-109. T 5e5-100. 

See en ed eee EA ee ee Pare pee ee SO Se Oa oe ae es ae ee 

7 OM 17.57% 1.99 2.941 1.04 2 05°88 042 &.0 .S5647 .073 
“W761 B76 B.NNB 7.97 2208S 6209 67992 2142 21651 .9186 29.9 7.4663 255 


us 2.71 HSIN = “643, B= A510 P7REN = L608 EQSA = 14.44 
PA/SEGY= 5,5-°5.6 Be-1% 1%.-25-6 25.250. 50.-100. x S.5-100. 
4 - 
90 16471 1.47 .7353 .735 8064 ., 706 1.4 .0034 .0heP 
-- SRR aaa eo ene ae _ 8e6 36626 2889 


U = 7.70 WAIN = S36, TS 42578 AZHENM = {R.2425 ENPA = 14.37 
PA/SEGY= &,5=%, 8.-13. 17.+25. 75.-50. £0.-109. T 525-190, 

s, . 
90 B8.A24H 3.60 1.4671 1.04 1.6 2.1945 .069 
W356 5R 1967 8063 S.61 L221 P55” - 7 ~~ 6e0 2.81 2400 


STN SB BS 2652 B7 AED =-18,5169 EFA = 16.74 

| PASEGYS 6,5-6. A.-1k. 1%.-75, 254-50, 59.-109. T 6,519), 
‘ 90 2.57% .973 1.287 .4AK beM .1%h2 03K 
TTBS 1255275 10 7H 719. 2U2> 558 SK 25.6 1.730 0192 


or 


gesvere ee ese ese 


i 
, 


Coreen ee ; “ee 


“SATELLITE S77-3, ENERGY SPECT2UM LISTING ~~ ~~~ 


, Tt 280 HNN = e590. 8 = ~.0537 A73EN = &.2041 ENPA = 29,19 


Z PAsTRY= 5,5-%, 8.-1*, 1%.*25, 25.°50, 50.-10"%. T S.5-100. 
TTT BGT SBT oe OT OT O72 TO THT TAT 1G TE O77 TOPS PF $9K- FS Ta IF 


‘ 90 43.75 1.27 1.919 .18€ 1.3707 1.984 ,27N3 .O33 20716 2.012 We® 1.514% 6039 
TTD THUG 6650 22087 L177 5S. 75H 6 %75 16175 6117 .476F cOSL PRON 12.46 6191 - 


” UE “2769 “HRT Ss” BR25, Be 70715 875FN = ~5.5745 EPS = ~ 75.96 
OA/SEGV= 5,5-4, B.-13. 13.-°25. 754-5", 50.-109, T 55-190. 
7 S.IG7 USF 6295 HBL NSS TLE A789 1S Pus 7h LG 08S 
20 45.73 1634 20FK7 12038 .271F 2043 613971 2025 .HFL1% .010 47.4 1.319 2035 
0 ~W 355.5 5.68 25.32 TH 7.011 2 27h 1.bKS PLR 1256S OHI 275.4 L154 6194 


~— CS  O.P9 YNIN SRS RB = I NgBs RV BEO = 7LE4O1 EAP A = tka t 


PASERY= 5,5-P, 6.-13. 13.°25, 25.°50, S0.°190. T 5.5-190,. 
FT T4996 UST NOLT LTRS SUSI. N22 S665 S7=G 15.8 MB ITs 


‘ OO 3M, 31 1.57 26528 othl 2199 ,049 .17KE MHD 61525 1.017 15.6 16147 13153 
OU 26, 7° B49 22.8% 1.679 1.62 6292 1.172 2181 o53503 6186 1914.2 8.917 12756 


ITE 9 HNIN = 9557, R= 1253 ByREN = 967487 ENPA =~ 48,58 


_ PA/SERY= 5.53, Berit. 13.-25. 25.°5%6 59 +109. T 5.5-100. 
7 GI07 640 “VU26E N25 Gere eUIbe eOLi- 


99 75.15 1.97 1.576 407 .2MK2 619? 60735 .NH2 «0123 1.912 7.0 1.073 0977 
WTNH 1565 29.69% 3.52 % SP2 .FGL 1.076 2295 . 3519 6124 34.6 19,94 V49u 


“~L = 2,90 RMIN => 1156. R= ©2123) B/PEN = 156.5697 EAPA = 16,22 — 


PA/EGY= 5.5-8, Berit 13.-75. 25.-50. ©0.-100. T 55-100. 
ry — 82 
On .73S7% .77%5 7RST 425 20294 .029 Ze .0512 1.923 
. OTA A7 5623 G.238 1.33 .28R8T .298 . 2639 th? 17.8 2.051 4219 


.. & = £2e86 AMIN =” Cir Be “2353 AZSEQ = 17.6961 ~EQPa =~ 13.75-— 


. PAZEGY= 5.5-8, Be-1% 13.-75, 26.-5N, 50.-190, T 5.5=1206 
CTT ere te eee re ee 36 

; an .0735 97% 26 106548 0065 
oe 220° 359 BOSD 666K . 22077 5207 4.2 .9142 .400 
ETO PO TO HMIN 2 732, B= 42478 BVREQ = 19.1941 ENPA = —V3L20 

. PA/TGY= 5,5-8. 8-13, 13.-+25, 254-50. 50.-100. T 5.5-199, 

: SS a eee Be i eeame eens 
P O29 16471 2849 9804 .490 3.5 21756 4029 
LTT 27650°5.70 &.838 1.98 ~~ = pas ' 18.6 63496 01398 
OS 97 HTN BRAS BE 255 B7VREM = 70. R916 FIER 212.78 

. PASEGYS 5.548, 0.-1%. 13,-75. 254-50. 50,*1006 T 6 5-199, 
Slee ee Ele Fe ee a ON OG YG ag ee Den ae ee ee Re eee gre 

é 90 5.88? 2.9% 7676 368 +97HB 6077 «742 61061 6043 
ry ORI R88, eh0 SY wee ers Ie 
2 ra AMIN = 8295-22875 SRP REG | °71, 0731 ENP A = 12.88 

mm PA/TRY= 5.5-8, 6-1. 13.275. 28.50. 50,109. T §.5-100, 

ou ° 7 
i 90 16471 1.94 67353 0425 262 6 NBAG KD 
OW 2653F 8235 UGS 2523 Se ~ =" 946 1.199 5299 
OEP OMEN EET 2763 AAEM = OLSLRB ENA =e 12,51 ae 
« TAEGVS 645-9, Berit. 13.-75, 250806 50.*10%. t SsS<290, | 
I 


90 1671 1467 eth7H ,%H9 ATGH ,176 


2 . 
DN Syren 6277 


224 


* —SRYELLITE S7%=% ENERGY SSERTRUM LISTING 
mn See fii ee) TT 


“PB/RFQ = 5.9945 EPA = 24.11 


~ 


PA/EGV= &,5-4%. 


59.-100. T 5.5-100. 


2% «SOFT e1TS eUSHD oNPN G7R=S SHSG CM5SNS B74 ULI 25-8 G88 W457 Beet 
07399 AWHe& 61512 2915 .0F62 B7-4 19563 62737? 91-4 


0259 67238 
TOTS TCS 2eUlLS 235 e027 -L 2120-707? 


| a et ee on752 > a70F7 
| TIS ZI LT ERG ES GUE GTS-S U1 LSS VES BISWA TIT THE 
£16 60726 82-4 72.8 22993 ,n4n 


‘5 2956 1.0266 
T 37.05 L957 Seh2T V2TR LL7BS -O4TLLNIP CNEG .H7H7 2046 &OG.0 1.790 2056 


0011 61331 


“—=C = sere Here = “Go7, © 

PASEGY= 5.5-8, 
Cf eeenr eee ee Ceety”©6=—6UC Ree eeeee are 
99 3.952 .476 61716 1.765 978-5 4%=-4 6595 2054 .0712 .017% 32.0 . 3719 .029 
OSHC B 3-262 FOS? 8H 15.97 


“313 T9°_R7 REN 


o7%1-2.722 2202 


ie oe eee oes eee 
. PA/EGY= 5.54, 
ts 


Stee to be e1 te 282 
ee ae 
. OMSERY= 5.5<8, p 
ee Sh he ee ee a eS ae 


= 90 1.471 1.47 
Las UR eeee eee 


~ 21284 “RZ REG 


Tl... fe Ly pee Seer ee 
20598 2142 
©2°8 6111 


3.77 "KMIN = 
PASESY= 5.536 


252-50. 50.-10". T 5eS-190. 
en —$———$$——$__—__— : 


1555297. 76 23024 6792 


_ CO 
PA/FGY= 5.5-F, 


I 


22419 2742 - 


PA/TEGY= S,5-P, 


0617 061 603F8 2037 


7 GeAkeras tees = — ehS°S eles 


, C= 3.72 HHIN = 
PASEGY= 5.5=%, 


“.2676 RASREQ = 26.7028 EQPA = -10,75°> 7 


We 
“ o5%8 2042 
* U G1G7 1.69 23456 2346007 713827098 


econ HMNTH S  ~—553. °° 8 2810 ~~ S7REN = 1.6551 EQPA => 127 -— 


Ee CEE FE Le — ee ee RET ee 


o S7BG NTH SI7 07 Le 821-2067 — 


= P,P1N® EQPA =~ 2m, 47 
eA,-109, T Ry $= ie 


= L1.1°%643 > EQPA =~ “17.4% 
50.-100. T 525-1905 


©5715 4056 198.6 4.967 61267 


= 13.3021 “EQ°a = 15.31 

50.-109. T 525-100", 
202 
00768 1026 He? 228% 602% 
03958 6167 21.4 4932 .132 


= 20.G€A8% EPA = L277 

50.-100, tT 55-100. 
a tak, » eee 7 
1.2? .0374 .032 
7e2 F 2133 151 


= 74.7517 ENPA =~ 11.450 


x = > 
328 .0%07 .M1R 
20.8 61846 .087 


= 71.7194 EQPA = 19.2s 
50.-100. x 525-10". 

———-—— 4 --- 

?.? 

7.2 61967 .107 


=~ 25.6870 EQOA = 110157 
50.-100. Rs 55-1006 

. 
2098G ,01* boG 60442 .970 
“M691 2.069 16.9 61979 N96 


5.-190. T 55-199, 


7.6 69256 011 
nnn ESTHET POSS— 


©0.-100. BA! 5.5-10". 
Are) 
Ge 720-5 79-4 


| 


C 


| SBTELETTES73=%,— ENE PRY SSECTIUM LISTING 


27 oN = 81%, B= 2.0555 RAREQ = —9.3565 ENPA =~ 19.95 
~ PASEGY= 5.598, 8.-13. 13.-25. 26.-F9, 59.-100. T 5eS5-190, 
oF OTST eUl6 “8525S SSG ATT HG C1790 12 FIST 10S Hoe 
. 35 .N8HS £034 3Li3S-S5 31-4 .N9O37 1.017 .67H60 .922 190.6 «3894 «312 
TW IBGG 2TH LOGTS LNG - ~~ F62468 NSS S.91T 6118 602.4% 3. 06.065 ~ 
+ Ct *  °&#z4¥ot® WHIn =  aaS7,. F's 0806 S7PEQ9 = 13.4760 EQPA = ~ 15.31 ~~ 
PA/SERYV= 5,58. 6.-1% 13.25. 252°5%. 50.-109. T 5-5-1099. 
ss oe UTES FUG oLTOU .OTS S208 .0655 "N=G— 


” 39 0997 .05T 2.226 2116 494-9 49-4 .N879 012 66799 1.978 62.2 7890 2216 
O S55? PL 2979" 2n56 20169 2017 66957 N75 5.2741 142 364.4 3,066 2080 


. C= 7.72 UHYN = 56%, 6B C= ef1138 S4HEQ = 18.8592 EMA =~ 13,39 

»  SRSEGY= 5.5-%. A.-13, 17.-25. 25-50. §1.-100. T 5.5-190. 
ee ee ee ee a ee ee Tee Shee eae eT en ere 

. on ©9368 2021 52733 6162 14.0 3.982 2.092 
‘ US.185 1.06077 ne SSS CLIS Shzes 1675 7957 2t.4f- VStt 


T= 3.66 HAIN = 833, BS” «7634 B/BED = 41.4395 EQPA = 6.9% “4 


PASEGY= 5,e-8, 8-13, 1%.-25, 256-506 50.-109. T 525-109. 
: an 62726 6127 166 . 9728 2042 
ee, tenance rane: ; ——7257 63795 ~-@.8 .3@LR 1 75- 
“oe RTP OOHMIN => > 7URL 8 = UTES «AVRFQ = Bu.gFEt EQPA =~ 8.52 - 
PA/ESY= 5.5-8, #.-13. 13.-78, 256-80. En, -110. T 6.5-190. 
SS ———+§ 
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